while($file=<*>) { system(`cat $file;`); print "\n"; }