# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #57788] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=57788 >
r30166:
$ ./perl6 -e 'sub x{};sub x{1};say x'
1
$ ./perl6 -e 'class A{method x{1};method x{}};say A.new.x'
1
I think it's reasonable to expect both of these to give at least a
warning, as Perl 5 does.
$ perl -we 'sub x {} sub x {}'
Subroutine x redefined at -e line 1.
