foreach my $data (@datalineshasharraything) {
     print "Item1 is ", $data{'ItemName1'};
     print "Item2 is ", $data{'ItemName2'};
}