Select Code to Download

foreach my $file (@files) {
    if( -f $file) {
...
        print "<$file> is not a plain file.\n";
    }
}

use strict;
use warnings;
...
foreach my $file (@files){
    print "<$file> is ", -f $file ? '' : 'not ', "a plain file.\n";
}