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

No need to make it so difficult, if that's all you want to do.

system('find /backup -mtime +30');

[download]

In Section Seekers of Perl Wisdom