@$ItemListRef = (@$ItemListRef,$NumOut, "\t"); #### push @$ItemListRef, $NumOut, "\t"; #### print join "\t", @ItemList;