in reply to Re^4: merge multiple files giving out of memory error
in thread merge multiple files giving out of memory error

Well it's there, in $seen{$key1}[Count]. If that's not what you want you'll have to be more explicit.