Help for this page

Select Code to Download


  1. or download this
    my %colors = map { $_ => $hash->{$_} } grep { $_ =~ /color$/ } keys %$
+hash;