sub foo { my ($bar, $baz) = @_; if($bar) { return $baz; } return 0; } #### sub foo { my %hash = ( bar=> 1, baz=> 1, ); return %hash; } #### my %hash = ( foo => 1, longer_key => 1, ); #### my %hash = ( foo => 1, longer_key => 1, ); #### foo=> 1, longer_key=> 1,