I'm a little new to Perl (clearly) and this makes things much easier... My use of arrays was pointless. I'm just going to copy and paste all the code manipulating the arrays and operate on the hash. Thanks