Select Code to Download

#!/usr/bin/perl
                                                                      
+                     
...
  warn "READLINE\n";
  return "line\n";
}

TIEHANDLE: TieTest=HASH(0x80fcacc)
Use of uninitialized value in <HANDLE> at tietest.pl line 14.
readline() on unopened filehandle at tietest.pl line 14.
Use of uninitialized value in print at tietest.pl line 14.
Read: