[perl #62410] [BUG] can't call subs with namespaces, such as Foo::bar()

[via RT]

# New Ticket Created by  Jeff Horwitz 
# Please include the string:  [perl #62410]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=62410 >


the Foo::bar() format for calling subs no longer works as of r35597.  for 
me personally, it's a blocker for mod_perl6.

if i run the following script, the second sub call never happens, and 
there is no error.

  module Foo;

  sub bar($arg)
  {
      say $arg;
  }

  bar("without namespace");
  Foo::bar("with namespace");

[j...@groovy perl6]$ ../../parrot perl6.pbc x.p6
without namespace
[j...@groovy perl6]$


the PIR shows that instead of invoking the sub, rakudo is invoking "infix:,":

.namespace ["Foo"]
.sub "_block20"  :subid("12")
     .const 'Sub' $P23 = "13"
     capture_lex $P23
     $P22 = "!meta_create"("module", "Foo", 0)
     .local pmc metaclass
     set metaclass, $P22
     "!meta_compose"(metaclass)
     new $P33, "Str"
     assign $P33, "without namespace"
     "bar"($P33)
     get_hll_global $P34, ["Foo"], "bar"
     new $P35, "Str"
     assign $P35, "with namespace"
     $P36 = "infix:,"($P34, $P35)    # <--- offending code here
     .return ($P36)
.end

-jeff