while () { my($hStoreAdd $hStoreAdd2 $hStoreCity)=(split)[7,8,10]; #....add more vals above as you need, you can also use a range # of indicies as long as the range is lowest to highest, # [9,10,2..4] is ok but 4..2 would not be ok. }