sub foo {
    my $self = shift;
    my %args = @_;

    do_something() if $args{jam_on_it};
}

##</code><code>##

    my %args    = validate(@_, {
        search_text     => { type => SCALAR },
        my_customer_id  => { type => SCALAR },
    });