perl ... > foo.txt