in reply to calling subs using references.

If your goal is to call $tes->test1(), then try this:
my $method = $rf->{test1}; $tes->$method();