Select Code to Download

@out = map{ $_ == $target and last } @in;

sub x{
    my $target = shift;
...
2
3
4