my %new2 =
hmap { $_[1]{nick} =~ /rbush|fred/
          ? $_[0] => { hmap { $_[0], $_[1] } %{$_[1]} }
          : ()
     } %$h;