DB<57> x sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( @a ) }
2:        sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( @a ) };
2:        sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( @a ) };
in  $=main::wants() from (eval 50)[C:/Dwimperl/perl/lib/perl5db.pl:640]:2
 2:       sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( @a ) };
 2:       sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( @a ) };
0  undef

DB<58> x sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( undef @b ) }
2:        sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( undef @b ) };
2:        sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( undef @b ) };
in  $=main::wants(undef) from (eval 51)[C:/Dwimperl/perl/lib/perl5db.pl:640]:2
 2:       sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( undef @b ) };
 2:       sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; ${ wants( undef @b ) };
0  undef

DB<59> x sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; @{ wants( @c , undef @c ) }
2:        sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; @{ wants( @c , undef @c ) };
2:        sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; @{ wants( @c , undef @c ) };
in  $=main::wants('', 1, undef, 2, undef) from (eval 52)[C:/Dwimperl/perl/lib/perl5db.pl:640]:2
 2:       sub wants{ @d = @_; wantarray ? ( shift @d, shift @d ) : \ shift @d }; @{ wants( @c , undef @c ) };
panic: attempt to copy freed scalar 302528c to 30257dc at (eval 52)[C:/Dwimperl/perl/lib/perl5db.pl:640] line 2.