diff options
| author | Luis Mochan <mochan@fis.unam.mx> | 2020-12-15 12:20:16 -0600 |
|---|---|---|
| committer | Luis Mochan <mochan@fis.unam.mx> | 2020-12-15 12:20:16 -0600 |
| commit | 9e7ce74aed79a0a445bea7d0dcf903b405361ad0 (patch) | |
| tree | c7da1610ea8e72805419d6fc997034d4fe4e1aff | |
| parent | abf0b8a71295c0c00fcee0659fd795ff48d45248 (diff) | |
| download | perlweeklychallenge-club-9e7ce74aed79a0a445bea7d0dcf903b405361ad0.tar.gz perlweeklychallenge-club-9e7ce74aed79a0a445bea7d0dcf903b405361ad0.tar.bz2 perlweeklychallenge-club-9e7ce74aed79a0a445bea7d0dcf903b405361ad0.zip | |
Remove old comment
| -rwxr-xr-x | challenge-091/wlmb/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-091/wlmb/perl/ch-2.pl b/challenge-091/wlmb/perl/ch-2.pl index 6885068e53..3cba6eceae 100755 --- a/challenge-091/wlmb/perl/ch-2.pl +++ b/challenge-091/wlmb/perl/ch-2.pl @@ -21,5 +21,5 @@ foreach(reverse (0..$#stones-1)){ # add stepping stones from left to right unshift @stepping_stones, $_ if $stepping_stones[0] <= $_+$stones[$_]; } say $stepping_stones[0]==0 - ?"1 Success\nPath: " . join "->", @stepping_stones # Notice I n + ?"1 Success\nPath: " . join "->", @stepping_stones :"0 Failure"; |