MySQL for Linux on POWER 开发应用

核心提示： #! /usr/bin/python要在运行之前修改权限以使得文件可以执行，运行下面的命令：chmod 755 python2mysql.py现在我们就可以如运行 shell 脚本一样运行这个文件：nik@bluebill:~> ./python2mysql.py200 Applic

#! /usr/bin/python

要在运行之前修改权限以使得文件可以执行，运行下面的命令：

chmod 755 python2mysql.py

现在我们就可以如运行 shell 脚本一样运行这个文件：

nik@bluebill:~> ./python2mysql.py
200　　 Application Programmer　35.48
201　　 Database Administrator　38.5
202　　 Technical Support　　　 27.0
207　　 Database Designer　　　 49.99

使用 Perl 进行 MySQL 开发

要使用 Perl 开发用于 MySQL 的应用程序，您需要至少拥有下面的组件：

Perl 解释运行期环境

Perl 数据库接口（Database Interface，DBI）

用于 MySQL 数据库的 Perl 数据库接口

在 RHEL 和 SLES 等主流的 POWER 上 Linux 发行版本的标准发行版本中，包含全部这些组件。

在网络上可以找到最新的 Perl 和 Perl MySQL DBI 发布版本和文档（见 参考资料）。

本节给出了一个简单的示例，执行与前面的 Python 示例相同的功能。

下面的示例连接到 CONTRACTING 数据库，执行查询并显示出结果：

清单 5. Perl 代码示例

#!/usr/bin/perl
use DBI;
# server host information
$host="127.0.0.1";
$port="3306";
#database and user credentials information
$db="CONTRACTING";
$userid="mysql";
$passwd="";
$connectionInfo="DBI:mysql:database=$db;$host:$port";
# connect to the database
$dbconn = DBI->connect($connectionInfo,$userid,$passwd);
# prepare and execute query
$query = "SELECT * FROM JOB ORDER BY JOB_CODE";
$st = $dbconn->prepare($query);
$st->execute();
# assign columns
$st->bind_columns(undef, $JOB_CODE, $JOB_NAME, $JOB_HOUR_CHRG );
# output the result
while($st->fetch()) {
　 print "$JOB_CODE　　 $JOB_NAME　　 $JOB_HOUR_CHRG
";
}
$st->finish();
# disconnect from the database
$dbconn->disconnect;

与先前的 Python 示例一样，可以在命令行中通过解释器运行这个 Perl 代码：

perl perl2mysql.pl

或者令其可以执行：

chmod 755 per2mysql.pl

并如同运行 shell 脚本一样运行它：

nik@bluebill:~> ./perl2mysql.pl
200　　　Application Programmer　35.48
201　　　Database Administrator　38.50
202　　　Technical Support　　　 27.00
207　　　Database Designer　　　 49.99

在后面一种情况下，必须要有指向 Perl 二进制程序位置的“magic”行：

#! /usr/bin/perl

结束语

人们普遍认为 MySQL 是当前性能最好的可用开放源代码企业级 Linux 关系数据库服务器之一。IBM 64-位 POWER 平台具备出众的性能、可靠性和高可用性，能够满足现今客户的所有需求。MySQL RDBMS 具备强健的特性，基于 IBM POWER 处理器的服务器具备微分区、动态启用和禁用 SMT 的能力，它们联合起来为市场提供了一个最为强大的 Linux 数据库服务器平台。