Help for this page

Select Code to Download

Select or download this

use Data::Dumper;
my @list=`find . -type f -mtime +30`;
print Dumper \@list;