my $directory = '/var/log';
my $timelimit = time - 60 * 15;

my @files = File::Find::Rule->file()
                            ->mtime( ">$timelimit" )
                            ->in( $directory );