if ($self->can($self->{method}))
{
    my $method = $self->{method};
    $self->$method(@params);
}
else
{
    die "Sorry, the method $self->{method} isn't valid!";
}