in reply to Re^6: Out of memory error!!!in thread Out of memory error!!!
... while (defined(my $line2 = $INFO)) { ... [download]
... you need to use the diamond operator to read from a file line by line:
... while (defined(my $line2 = <$INFO>)) { ... [download]