Select Code to Download

$testo=qq(<a href="/cgi-bin/a_test/test.cgi?id=$id&fred=wombat">$testo
+</a>);

foreach(param())
{
    print "$_ = ".param($_)."<br>\n";
}

id = [whatever was in $id]
fred = wombat