in reply to Re^3: Regular expression problem
in thread Regular expression problem

Bend like a soft reed in the wind: 

sub print_html {
    my %param = @_;

    exists $param{$_} and print "$_: $param{$_}\n"
        for qw(onChange onClick);
}

[download]

jeffa

I guess i should note for the record that this was my 2112th node, a Rush reference.

In Section Seekers of Perl Wisdom