| Next | Tricks of the Wizards | 1 |
mjd-omniti-tricks+@plover.com
If you don't understand this, you may not get much out of this class:
my $x = M->yup(13);
print $x->{V}, "\n";
sub M::yup { my ($p, $v) = @_; bless {V => $v}, $p }
| Next |  |
Copyright © 2003 M. J. Dominus |