my $username = param("username"); my $password = param("password"); my $user2; my $pass2; my $name; my $client; &Create_DB_Connection; $SQL = "SELECT name, clientid, login, password FROM Client WHERE login='$username' AND password='$password'"; &Do_SQL; while ($pointer = $sth->fetchrow_hashref) { $user2 = $pointer->{'Login'}; $pass2 = $pointer->{'Password'}; $name = $pointer->{'name'}; $client = $pointer->{'ClientID'}; }