use Benchmark qw(&cmpthese);

$STUDIED_TEXT = $TEXT;
study $STUDIED_TEXT;

cmpthese($COUNT, { 'with study' => \&fn1,
                   'w/o study'  => \&fn2 } );