Select Code to Download

my $sub_i_want_to_call = $ary[rand @ary];
my $sub_ref = __PACKAGE__->can( $sub_i_want_to_call );
$sub_ref->();

__PACKAGE__->can( $ary[rand @ary] )->();