File::Slurp or Path::Tiny may be your friends. Beware, your system's memory may not like you if the file is too big.

Beyond that, suggestions below about improving your algorithm and utlizing Perl builtins seem to suffice.