Select Code to Download

use strict;
use warnings;
...

    close $fh;
}

use strict;
use warnings;
...
    print "$YMLfile: " . ( $currentTime - $mtime ) . " seconds old\n";

}

for my $YMLfile (<"$directory/*.yml">) {
    print -M $YMLfile, "\n";
}