Select Code to Download

$ perl -Mstrict -Mwarnings -E '
    my $match = "AZ";
...
    say "@keepers";
'
AZ SX AZ DC

$ perl -Mstrict -Mwarnings -E '
    my $match = "AZ";
...
    say "@keepers";
'
AZ AZ