#!perl
use strict;
use warnings FATAL => 'all';

use Test::More 'no_plan';

{
    package Stuff;

    use Test::More;
    use Function::Parameters qw(:strict);

    method echo($arg) {
        return $arg
    }

    my $method = method ($arg) {
        return $self->echo($arg)
    };

    is( Stuff->$method("foo"), "foo" );
}