Select Code to Download

use Params::Validate qw (validate_with);
sub example_method {
...
    my ($handle, $thing) = @args{'handle','thing'};
    #...
}

use Class::ParmList qw (simple_parms);
sub example_method {
...
    my ($handle, $thing) = simple_parms(['handle','thing'],@_);
    #...
}

 use Sub::Parms;
 sub example_method {
...

    #...
 }

sub example_method {
   my $self = shift;
...
   my ($handle,$thing) = @args{'handle','thing'};
   #...
 }