Re: How do I call a sub using a variable as its name, objectively

[choroba]

It's in fact much easier. Use a variable to keep the method name:

#!/usr/bin/perl
use warnings;
use strict;

{   package My;
    sub new { bless {}, shift }
    sub show { my ($self, $name) = @_; print "Hello $name!\n" }
}

my $A = 'My'->new;

my $method = shift;
$A->$method(@ARGV);

Using it:

$ 1.pl show World
Hello World!

Otherwise, you need to do a reference/dereference trick:

$A->${\ $ARGV[0] }(@ARGV[1 .. $#ARGV]);

Update: Fixed arguments for the second example. Thaks etj.

[etj]

To be exactly equivalent, that last one would need to be: $A->${\ $ARGV[0] }(@ARGV[1..$#ARGV]);