
18 Jun
2010
18 Jun
'10
5:51 p.m.
On Jun 18, 2010, at 2:36 PM, Alexander Solla wrote:
Package Number; sub new { my $class = shift; my $self = shift; bless $self, $class; return $self; } sub plus arg { return $self + arg; } sub minus arg { return $self - arg }
Syntax errors in my Perl (sorry, the last time I did Perl seriously, we used an extension for named arguments) sub new { my $class = shift; my $self = shift; bless $self, $class; return $self; } sub plus { my ($self, $arg) = @_; return $self + $arg; } sub minus { my ($self, $arg) = @_; return $self - $arg; }