Select Code to Download

$ ./perl6 -e 'supersede sub a { }'
===SORRY!===
"supersede" not yet implemented at line 1, near " sub a { }"

sub asub ( $ace, $deuce?, $trey? ) {
    say "$ace $deuce $trey";
...

    is asub(1), 'asub', 'lexically hiding works';
}