my $method = $subs[0];
$foo->$method;

##</code><code>##

$foo->${ \$subs[0] };