People continually amaze me with their ability to abuse perl. open ( FH , "/bin/cat -n $File | "); is really horrible.