Searched refs:Demo (Results 1 - 3 of 3) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Attribute/Handlers/demo/
H A Ddemo.pl4 use base Demo;
6 my $y : Demo :This($this) = sub : Demo(1,2,3) {};
7 sub x : Demo(4, 5, 6) :Multi {}
8 my %z : Demo(hash) :Multi(method,maybe);
14 use base Demo;
16 sub Demo :ATTR(SCALAR) { print STDERR "tada\n" } subroutine
18 my $y : Demo :This($this) = sub : Demo(1,2,3) {};
19 sub x : ExplMulti :Demo(
[all...]
H A Ddemo2.pl4 use base Demo;
13 sub foo :Demo(till=>ears=>are=>bleeding) {}
14 sub foo :Demo(['till','ears','are','bleeding']) {}
15 sub foo :Demo(qw/till ears are bleeding/) {}
16 sub foo :Demo(till,ears,are,bleeding) {}
18 sub foo :Demo(my,ears,are,bleeding) {}
19 sub foo :Demo(my=>ears=>are=>bleeding) {}
20 sub foo :Demo(qw/my, ears, are, bleeding/) {}
21 sub foo :Demo(qw/my ears are bleeding) {}
H A DDemo.pm3 package Demo; package
8 sub Demo : ATTR(SCALAR) { subroutine
22 sub Demo : ATTR(HASH) { subroutine
29 sub Demo : ATTR(CODE) { subroutine

Completed in 15 milliseconds