umm the time is spent in the inner loop because for each id it searches the whole log file again which at 50 MB is huge ; so i am making n-no of unique ids +1 sweeps basically; it didnt finish in 1.5 hrs so i killed it.checked with a smaller file it took 10 mins

for profile module "perl -d:Profile test.pl " only -d parameter is needed ?

and yes $2 i was worried too but output is as expected