in reply to How can i debug compound map/grep statements just using print?
Did you mean:
$amount = $amount * 24 * 60 * 60;
And have you tried:
$result = grep { /.+\.$suffix$/ and $time - ( $_->stat )[9] >= $amount } io($dir)->all;
$result is the file count...
In Section
Seekers of Perl Wisdom