Select Code to Download

&defineOrder(\$widget1, \$widget2, \$widget3)

sub defineOrder
{
...
    }
    ${$_[0]}->focus;
}

&defineOrder(qw/$widget1 $lwidget2 $widget3/);
...
    }
}