diff options
| author | Simon Proctor <simon.proctor@zpg.co.uk> | 2019-06-10 10:01:30 +0100 |
|---|---|---|
| committer | Simon Proctor <simon.proctor@zpg.co.uk> | 2019-06-10 10:01:30 +0100 |
| commit | 295001f32ec6fd9ef204c62b86af10ae50945597 (patch) | |
| tree | 182d85c541ac0d64a30314379d11efffea319e86 | |
| parent | beece1a136152e7819ab4a8ff7f962df078cbd14 (diff) | |
| download | perlweeklychallenge-club-295001f32ec6fd9ef204c62b86af10ae50945597.tar.gz perlweeklychallenge-club-295001f32ec6fd9ef204c62b86af10ae50945597.tar.bz2 perlweeklychallenge-club-295001f32ec6fd9ef204c62b86af10ae50945597.zip | |
Fixed empty call bug
| -rwxr-xr-x | challenge-012/simon-proctor/perl6/ch-2.p6 | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/challenge-012/simon-proctor/perl6/ch-2.p6 b/challenge-012/simon-proctor/perl6/ch-2.p6 index cbfd7b1c73..22170940f4 100755 --- a/challenge-012/simon-proctor/perl6/ch-2.p6 +++ b/challenge-012/simon-proctor/perl6/ch-2.p6 @@ -4,6 +4,10 @@ use v6; my %*SUB-MAIN-OPTS = :named-anywhere; +multi sub MAIN is hidden-from-USAGE { + say $*USAGE; +} + #| Given a list of paths returns the longest shared path between them multi sub MAIN( *@paths, #= List of paths to check |