Karl-Mac-mini:find karl$ find . -type f -name "*.txt" | xargs ./perl.pl 
bar
foo