Select Code to Download

my @keys = grep /^t/, keys %hash;
my %newhash;
@newhash{@keys} = @hash{@keys};

#!perl -w

use strict;
...
just_map   399/s         --        -3%        -3%
grep_map   412/s         3%         --        -0%
grep_slice 413/s         4%         0%         --