my $this = Klasse->new;
my $methodname = 'irgendwas';

my $sub = $this->can( $methodname );
$this->$sub() if $sub;