There's no need for eval here.

my $method = "prefix_$key";
$f->$method($atr);
[download]