Help for this page

Select Code to Download


  1. or download this
    %ret = map{ $_->{key} =~/^a\d+/ ? ($_->{key} => $_->{value}) : () } @$
+data1;