Select Code to Download

=== lisp (racket) ===

...
    }
 
    sub samefringe ($a, $b) { all fringe($a) Z=== fringe($b) }

    use v5; # start with p5 code

...
    }

    say "Back to Perl 5 on $^O"