http://qs321.pair.com?node_id=11103469


in reply to map question

You should have used the variable $item as the key instead of the string item. Change:
unless ( $skipper {item} ) { # not found in list?
to:
unless ( $skipper {$item} ) { # not found in list?