use File::Find::Rule;

my @files = File::Find::Rule->file
                            ->in('/mnt')
                            ->name( qr(\d+\.$host\.mksysb) )
                            ->maxdepth(1)
                            ->mtime(">= $mksysb_cutoff");