Select Code to Download

my $as_string = 'startKEY=jdjhjfg8y4uh449845&finish';
$as_string =~ /KEY=([^&]+)\&/;
print $1, "\n";

use strict;
use URI;
...

my %pair = $uri->query_form();
print $pair{startKEY}, "\n";