从perl将数据插入mysql数据库

我正在尝试将数据插入MySQL数据库：

$response = $client->fql->query(
  query => '
    SELECT name, email, birthday, username, first_name, last_name, pic
    FROM   user
    WHERE  uid =  me()
  ',
);

print join "\n Name:",  sort map { $_->{name} } @$response;

$dbh->do("
  INSERT INTO Users(SNo,Name,Email,Birthday,UserName,FirstName,LastName)
  VALUES(1,
         sort map { $_->{name} } @$response,
         'imm\@gmail.com',
         '1987/12/10',
         'imm',
         'imm',
         'Dee')
");

$dbh->disconnect();

在一行中使用了mysql查询

上面的print语句正确地打印了名称，但是为什么上面的sqlinsert语句不起作用呢

我连接数据库，然后我接收到值，并在浏览器中进行打印

为什么mysql语句不接受该值？

---

当插入数据库不起作用时？

您应该看看

特别是：

# INSERT some data into 'foo'. We are using $dbh->quote() for
# quoting the name.
$dbh->do("INSERT INTO foo VALUES (1, " . $dbh->quote("Tim") . ")");

# Same thing, but using placeholders
$dbh->do("INSERT INTO foo VALUES (?, ?)", undef, 2, "Jochen");

---

您可以在一次

插入中完成此操作。。。选择