Select Code to Download

if (-M $file >= $age){
    unlink $file or die "can't delete the damned file!: $!";
}