Select Code to Download

#!/usr/bin/perl
use warnings;
...
my $methodname = 'url';
my $methodref = $o->can($methodname);
say $o->$methodref(1142751);