Re: what "shift" does, if not "$_ = shift;" ?



sorry, I lose

print map {" @{$_} \n"} values %all;
check_items_for_all(\%all);
print map {" @{$_} \n"} values %all;

in my pasted code
.