Help for this page
@url=qw($url2 $url3 $url4 $url5 $url6 $url7);
@oldurl=$sth->fetchrow;
@url = map {$q->param("rurl$_")} (2..7);