my $method_ref = $obj_or_class->can('method');

##</code><code>##

my $method_name = 'method';

##</code><code>##

$obj_or_class->$method_ref()

##</code><code>##

$obj_or_class->$method_name()

##</code><code>##

$ref = sub { $obj_or_class->new(@_) }