find /start_dir -name '*.pl' -exec grep -n mail {} /dev/null \; > resu +lts.txt