Привет, знатоки и Гуру!

Я , конечно понимаю, что отвлекаю Вас по пустяковой проблеме, но - выхода другого не вижу.

Пишу 1 в своей жизни доступ к mySQL из Perl через Web.


Создал базу:

$sth = $dbh->prepare(q{create table users(
id int not null auto_increment,
login char(20),
pwd char(20),
name char(40),
primary key (id)
)})

Занес в базу пользователей

login = 'watson' , pwd = '123' , name = 'Vadim'.
login = '1' , pwd = 'test' , name = 'test1'.

Теперь пытаюсь их извлечь из базы:

$input_login = 'watson';

$sth = $dbh->prepare(" select login, pwd, name from users where login = $input_login ");

Дает пустой ответ, а если сделать $input_login = '1'; - то все ОК.

На всех пользователей у которых поля символьные - не Select-ит, а числовые - все ОК. Пробовал задавать явно
$sth = $dbh->prepare(" select login, pwd, name from users where login = 'watson' ");

Все работает, а через переменную - нет.

HEEELP!!!!!!!!!!!!!