Select Code to Download

$ perl -Mstrict -Mwarnings -E '
    my %lexicon = map { $_ => 1 } qw{own known};
...
    say $1;
'
known

$ perl -Mstrict -Mwarnings -E '
    my @lexicon = qw{own known};
...
    say $1;
'
known