: | perl -le 'print eof(STDIN)'