1234
open(FOO, "cat -n '$file'|");open(FOO, '-|', "cat -n '$file'");open(FOO, '-|') || exec 'cat', '-n', $file;open(FOO, '-|', "cat", '-n', $file);