time perl -MFile::Find -e'finddepth sub { unlink if -f }, @ARGV' /tmp

##</code><code>##

time find /tmp -type f | xargs rm