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


in reply to Simplifying for loop and applying multiple push function

my %hash = ( 1 => 'one' , 2 => 'two' , 3 => 'three' ); no strict; map { push @{ ++$i % 2 ? 'one' : 'two'}, $_ } %hash; print "@one\n"; print "@two\n";

Another one-line attempt. But maybe it should count as two...