open(F, "<README");   # arbitrary
$|=1;

while(<F>) {
    print "line $.\n";
}