[perl #61806] undefined hash, something wrong (plz make subject better if your understand what is right behavior)

[Patrick R. Michaud via RT]

On Mon Dec 29 04:25:51 2008, ihrd wrote:
> 
> > sub foo (%h?) { { a => 1, %h }.perl.say; }; foo( { b => 2 } );
> {"a" => 1, "b" => 2} # :)
> 
> > sub foo (%h?) { { a => 1, %h }.perl.say; }; foo( { } );
> {"a" => 1} # :)
> 
> > sub foo (%h?) { { a => 1, %h }.perl.say; }; foo();
> Odd number of elements found where hash expected # :(

These are the same issues as RT #61172 -- merging tickets.

Pm