use NumObject; my ($a, $b) = (NumObject->new(), NumObject->new()); my $c = $a + $b; my $d = $a->addObjects($b); my $e = NumObject::addObjects($a, $b);