"http://www.somesite.com/page1.htm?age=10&name=Tom"

##</code><code>##


my $url = self_url();
$url =~ s/name=Tom/name=Betty/;

print $url, "\n";

--output:--
http://www.somesite.com/page1.htm?age=10&name=Betty