Select Code to Download

-p      causes Perl to assume the following loop around your
        program, which makes it iterate over filename arguments
...
} continue {
    print or die "-p destination: $!\n";
}