$a = ( 1 => blah() );

  __END__
  wantarray =