Help for this page

Select Code to Download

Select or download this

for (@mem) {
    next unless my $member = $obj->can ("_do_$_");
    $obj->$member ();
}