33、Perl与DBI：数据库操作全解析

Perl与DBI：数据库操作全解析

1. 展示音乐家乐器的示例

当我们想要展示音乐家的乐器时，可以借助Perl、CGI和DBI来实现。以下是具体的实现步骤和代码：
1. 启动HTML并打印文本 ：开始HTML页面，打印一些提示文本，然后创建一个无序列表。
2. 查询数据库 ：使用表连接查询数据库，获取音乐家演奏的乐器。

# query the database with a table join and retrieve the
# instruments played by musician
my $dbh = DBI->connect("DBI:mysql:musicians_db", "musicfan",
                      "CrimsonKing");
my $sth = $dbh->prepare("SELECT instrument
            FROM instruments
            JOIN what_they_play ON instruments.inst_id = what_they_play.inst_id
            JOIN musicians ON what_they_play.player_id = musicians.player_id
            WHERE musicians.name = ?")
                 or die "prepare failed: " . $dbh->errstr()