Subject: | empty subroutines return bogus values |
Seemingly empty subroutines return phantom values:
$ cat bug/empty-body2
#!perl
use Method::Signatures::Simple;
func empty($x, $y) {}
print scalar empty("A", "B"), "\n";
__END__
$ perl bug/empty-body2
2
$ cat bug/empty-body
#!perl
use Method::Signatures::Simple;
method empty() {}
print "$_\n" for __PACKAGE__->empty;
__END__
$ perl bug/empty-body
main