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

##</code><code>##

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