Help for this page

Select Code to Download

Select or download this

test 1 ||
Use of uninitialized value in string eq at /usr/lib/perl5/site_perl/5.
+8.7/myTool.pm line 316.
test 1 ||
Use of uninitialized value in string eq at /usr/lib/perl5/site_perl/5.
+8.7/myTool.pm line 316.

Select or download this

read $fh, $binrec, $l ;     
print "test 1 |$binrec|\n" ;
...
     print "test 2\n" ; 
     ...
}