#!/usr/local/bin/perl print "non-error\n"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; print "non-error\n"; print "non-error\n"; print "non-error\n"; sleep(1); print "non-error\n"; print "non-error\n"; print "non-error\n"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; sleep(1); warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; sleep(1); print "non-error\n"; print "non-error\n"; print "non-error\n"; warn "-E- test error"; warn "-E- test error"; warn "-E- test error"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; print "non-error\n"; sleep(1); print "non-error\n"; sleep(1);