$url='http://myurl.com/page.pl?key1=val1&key2=val2&key3=val3';
@value = ("AAA", "BBB", "CCC", "DDD");
for $val (@value)	{
	for (1..3)	{
		$t=$url;
		$t=~s/\bkey$_=val$_\b/key$_=$val/i;
		print $t,$/;
	}
}