#!/opt/local/bin/perl

$|++;
print "1:  I am great!\n";
print "2:  I am great!\n";
warn "3:  Warning:  I am great!\n";
print "4:  I am great!\n";