pole1 pole2
q 1
w 2
e 3
r 4
как узнать какой букве какая цифра соответствует
use DBI;
$dbdriver = "mysql";
$hostname = "localhost";
$port = "3306";
$username = "qqqq";
$passwordb = "qqqq";
$basename = "Worktime";
$tablename = "www";
print "Content-type: text/html
";
$dbh =
DBI->connect("dbi:$dbdriver:$basename:$hostname:$port","$username","$passwordb");
$sqlstatement = "SELECT pole1,pole2 FROM $tablename" WHERE pole1=\'w\';
$sth = $dbh->prepare($sqlstatement);
$sth->execute || die "Невозможно выполнить SQL-запрос.";
while (@row=$sth->fetchrow_array) {print @row
;}
print "