blob: 46d05b4dbd201303e21f5a43963b029f223dfd0e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
use 5.038;
use feature 'class';
use warnings;
no warnings 'experimental';
class C {
# "method" is not yet understood by perl-mode, but it isn't
# relevant here: We can use "sub" because what matters is the
# name, which collides with a builtin.
sub m {
"m called"
}
}
say C->new->m;
# This comment has a method name in it, and we don't want "method"
# to be fontified as a keyword, nor "name" fontified as a name.
__END__
=head1 Test using the keywords POD
This piece of POD has a method name in it, and we don't want "method"
to be fontified as a keyword, nor "name" fontified as a name.
|