use vars qw|$myvar|;
$myvar = "...";

##</code><code>##

our $myvar = "...";

##</code><code>##

timethese(100000, { 
   Greedy  => sub { $myvar =~ /"(.*)"/ }, 
   Lazy    => sub { $myvar =~ /"(.*?)"/ }, 
   Negated => sub { $myvar =~ /"[^"]*"/ } 
});