package Class; 
sub new { bless {} }
sub method ($$) {my $self=shift; my $arg=shift }

package main; 
my $object = Class->new(); 
$object->method();       # OK
$object->method("foo");  # OK
Class::method($object);  # fails. Whines about arg count. 
&Class::method($object); # OK