Select Code to Download

$obj_multi->new( $obj_1, $obj_2 );
$obj_multi->foo();                  # $obj_1->foo();  $obj_2->foo();

package MultiMethod;
use strict;
...
    }
}
42;

MultiMethod( 'methodname', [], $file, $file2 );

...
    my $args   = shift;
    $_->$method(@$args) for @_;
}