Select Code to Download

#! perl
use strict;
...
print "filename:    $filename\n";
print "directories: $dirs\n";
print "suffix:      $suffix\n";

16:23 >perl 1018_SoPW.pl
filename:    My-Folder
...
suffix:      .mkv

16:23 >