diff options
| author | Mohammad Sajid Anwar <Mohammad.Anwar@yahoo.com> | 2025-01-20 01:21:24 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2025-01-20 01:21:24 +0000 |
| commit | c04b3808368d9a1c3d2e5542437ca2b6eb637db0 (patch) | |
| tree | 1bab23f9ad42726ae0d37bb4642724a21c8a983b | |
| parent | 1492d837d59f639b474e4b0e744cb54f60476835 (diff) | |
| parent | 3ad279d4517799a75ff954f7dd06f1f263008f7f (diff) | |
| download | perlweeklychallenge-club-c04b3808368d9a1c3d2e5542437ca2b6eb637db0.tar.gz perlweeklychallenge-club-c04b3808368d9a1c3d2e5542437ca2b6eb637db0.tar.bz2 perlweeklychallenge-club-c04b3808368d9a1c3d2e5542437ca2b6eb637db0.zip | |
Merge pull request #11464 from MatthiasMuth/muthm-304
Challenge 304 Task 1 and 2 solutions in Perl by Matthias Muth - Update
| -rwxr-xr-x | challenge-304/matthias-muth/perl/ch-1.pl | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/challenge-304/matthias-muth/perl/ch-1.pl b/challenge-304/matthias-muth/perl/ch-1.pl index afba70e22c..9cf0d64918 100755 --- a/challenge-304/matthias-muth/perl/ch-1.pl +++ b/challenge-304/matthias-muth/perl/ch-1.pl @@ -10,8 +10,6 @@ use v5.36; -use Dsay; - sub arrange_binary( $digits, $n ) { my $string = join "", $digits->@*; while ( $string =~ s/ (?<!1) 0 (?!1) /1/x ) { |