my($key);
foreach $key ("name","email","website","homeaddress","city","state","phone","college","company","password") {
my(${$key}) = $query->param($key);
}

##</code><code>##

my($name)=$query->param("name");
my($email)=$query->param("email");