Commit | Line | Data |
04070b92 |
1 | package main; |
2 | use MyClass; |
3 | |
4 | my MyClass $x :Good :Bad(1**1-1) :Omni(vorous); |
5 | |
6 | package SomeOtherClass; |
7 | use base MyClass; |
8 | |
9 | sub tent { 'acle' } |
10 | |
11 | sub w :Ugly(sister) :Omni('po',tent()) {} |
12 | |
13 | my @y :Good :Omni(s/cie/nt/); |
14 | |
15 | my %y :Good(q/bye) :Omni(q/bus/); |
16 | |