mkaref( 1..9 ); # becomes mkaref 1..9; #### sub mkhref (%) { if ( @_%2 ) { carp "Odd number of elements in mkhref" if $^W; return { @_, undef }; } else { return {@_}; } }