$amount = $amount * 24 * 60 * 60; #### $result = grep { /.+\.$suffix$/ and $time - ( $_->stat )[9] >= $amount } io($dir)->all;