for (glob "$path/*">) {
    unlink if -f and -M _ > $cutoff;
}