diff options
| author | Myoungjin JEON <jeongoon@gmail.com> | 2020-08-08 09:23:41 +1000 |
|---|---|---|
| committer | Myoungjin JEON <jeongoon@gmail.com> | 2020-08-08 09:23:41 +1000 |
| commit | 89b6a95c9d059aec8c02c73c8dc1be1df99717aa (patch) | |
| tree | 4d3e19b3b4395e88f555375073328bf6f48c5b38 /challenge-072 | |
| parent | 23d54781aeadd4df1e44f69594aac941afc4d207 (diff) | |
| download | perlweeklychallenge-club-89b6a95c9d059aec8c02c73c8dc1be1df99717aa.tar.gz perlweeklychallenge-club-89b6a95c9d059aec8c02c73c8dc1be1df99717aa.tar.bz2 perlweeklychallenge-club-89b6a95c9d059aec8c02c73c8dc1be1df99717aa.zip | |
ch-072/jeongoon bug fixed in both perl and raku when matching "/0+$/" has no result
Diffstat (limited to 'challenge-072')
| -rw-r--r-- | challenge-072/jeongoon/perl/ch-1.pl | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/challenge-072/jeongoon/perl/ch-1.pl b/challenge-072/jeongoon/perl/ch-1.pl index bcb36adc2b..5cecf762e7 100644 --- a/challenge-072/jeongoon/perl/ch-1.pl +++ b/challenge-072/jeongoon/perl/ch-1.pl @@ -17,7 +17,6 @@ if ( not defined $N ) { $N = 10; } - sub f { return 1 if $_[0] == 1; # $_[0] < 1 is filtered above return $_[0] * f ($_[0]-1); |