diff options
| -rwxr-xr-x | challenge-331/matthias-muth/perl/ch-1.pl | 5 |
1 files changed, 0 insertions, 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] // "" ); } |