Help for this page
@$ItemListRef = (@$ItemListRef,$NumOut, "\t");
push @$ItemListRef, $NumOut, "\t";
print join "\t", @ItemList;