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


in reply to Perl Idioms Explained - my ($foo, $bar) = @{shift(@_)}{qw/ -foo -bar /}

My first thought on reading just the title of this piece was "Gawd! Who says that!" and then I opened the node. Whose perl have you been reading that this looked like an idiom to you?