Select Code to Download

$_ = 'This is "the search" string "that was" supplied';
my @quotes = (m/"(.*?)"/g); s/".*?"//g;
my @keys = split();

use strict;
use warnings;
...
    my @keys = split();
} 
print time() - $time;