Select Code to Download

#!/usr/bin/perl
use warnings;
...
}

print $wanted_data, $/;

#!/usr/bin/perl
use 5.014;    ## it wouldn't work for lower version
...
        print $data_filter{$key}->($_);
    }
}