Working with large data files

Could you suggest any way of making it more efficient ?

nope, sorry - I don't use Perl - maybe someone else can comment

Steve