perl -e '-e $ARGV[0] ? sleep 10 : die "GONE!" while 1' <FILENAME>