Help for this page

Select Code to Download

Select or download this

use Path::Class;

...
print $line3, "\n";
print $line4, "\n";
close($object);

Select or download this

1

...

IO::File=GLOB(0x4de178)
IO::File=GLOB(0x4de178)