From 09dc8e39a37bfc219facb104f0059d2a8fd0d718 Mon Sep 17 00:00:00 2001 From: Matthias Muth Date: Sat, 26 Jul 2025 17:56:35 +0200 Subject: Challenge 331 Task 1 and 2 solutions in Perl by Matthias Muth - Update --- challenge-331/matthias-muth/perl/ch-1.pl | 5 ----- 1 file changed, 5 deletions(-) diff --git a/challenge-331/matthias-muth/perl/ch-1.pl b/challenge-331/matthias-muth/perl/ch-1.pl index 39437e6f8a..adcb8c2513 100755 --- a/challenge-331/matthias-muth/perl/ch-1.pl +++ b/challenge-331/matthias-muth/perl/ch-1.pl @@ -10,11 +10,6 @@ use v5.36; -use Dsay; -$debug{ALL} = 1; -say pp split "", ""; -say pp scalar( ()[-1] ); - sub last_word_length( $str ) { return length( ( split " ", $str )[-1] // "" ); } -- cgit