diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-09 15:20:08 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-09 15:20:08 +0000 |
| commit | c27482a4ae759620db85e55c84e6da0b10b95e5a (patch) | |
| tree | 14167b3057c9228d5b472b180b701d67bf3a8bd4 /lib/Attribute/Handlers/demo/demo3.pl | |
| parent | 95f0a2f1ffc68ef908768ec5d39e4102afd28c1e (diff) | |
| download | perl-c27482a4ae759620db85e55c84e6da0b10b95e5a.tar.gz | |
Remove Attribute::Handlers, as per Damian's request.
(Because of fixing the my variables to be now handled
in run-time, the whole internals of the A::H needs to
be rewritten and Damian will not have time for that
for months.)
p4raw-id: //depot/perl@13544
Diffstat (limited to 'lib/Attribute/Handlers/demo/demo3.pl')
| -rwxr-xr-x | lib/Attribute/Handlers/demo/demo3.pl | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/lib/Attribute/Handlers/demo/demo3.pl b/lib/Attribute/Handlers/demo/demo3.pl deleted file mode 100755 index 6760fc08ba..0000000000 --- a/lib/Attribute/Handlers/demo/demo3.pl +++ /dev/null @@ -1,16 +0,0 @@ -package main; -use MyClass; - -my MyClass $x :Good :Bad(1**1-1) :Omni(vorous); - -package SomeOtherClass; -use base MyClass; - -sub tent { 'acle' } - -sub w :Ugly(sister) :Omni('po',tent()) {} - -my @y :Good :Omni(s/cie/nt/); - -my %y :Good(q/bye) :Omni(q/bus/); - |