Select Code to Download

#!/perl/bin/perl
use strict;
use warnings;
...
        warn("Cannot process $File::Find::name: Directory or unknown t
+ype\n");
    }
}