Fair warning, check how Perl was compiled.

There is a real possibility that Perl doesn't have large file support compiled in, in which case your script will break 2 GB of the way through the file.