in reply to (1) line of sh vs (~20) lines of perl ?

#!/usr/bin/perl -w use File::Find; find( sub { print "$_\n" if !-l && -M > 30 }, @ARGV);
Or, on the command line,
perl -MFile::Find -le 'find( sub { print if !-l && -M > 30}, @ARGV)'