Select Code to Download

#! perl -slw
use strict;
...
    push @r, [ $a, $b ];
    $b;
} split ' ', $s;

#! perl -slw
use strict;
...
    push @r, [ $a, $b ];
    $b;
} @s;