in reply to hash array removal ?

splice(@{$VAR2->{TRAPS}->{TRAP_LIST}},$index,1);