📜  珀尔 | DBI(数据库独立接口)模块组 – 1

📅  最后修改于: 2022-05-13 01:55:26.433000             🧑  作者: Mango

珀尔 | DBI(数据库独立接口)模块组 – 1

数据库是相互关联的数据的集合,有助于高效地从数据库中检索、插入和删除数据,并以表格、视图、模式、报告等形式组织数据。例如,大学数据库组织有关学生、教师和管理人员等的数据,有助于更有效地对这些数据执行操作。

可以借助各种工具和软件访问和操作该数据库。在 Perl 中,可以在 Perl 脚本的帮助下访问和操作数据库。这些脚本在称为DBI(数据库独立接口)模块的模块的帮助下运行。 DBI 模块提供了与MySQLOracle等许多数据库交互的 API。该模块提供了一组变量和方法,提供与数据库接口的交互,无需访问原始数据库。

Perl DBI 的体系结构

Perl 中的 DBI 不依赖于它使用的数据库。它从 API 获取命令和指令,并将它们转发给与其关联的驱动程序。

在 Perl 中将 DBI 连接到数据库

要连接到 Perl 中的数据库,必须在系统上安装数据库服务器。在这里,我们使用MySQL ,因此进一步的说明将与MySQL数据库相关。

首先:您需要在系统中安装 Perl 的 DBI 模块。这可以通过在您的 Shell 中运行以下命令来安装 DBI 模块来完成:

perl -MCPAN -e shell
install DBI


第二:启动您的 MySQL 服务器并按照以下步骤与您的 DBI 建立连接:

第 1 步:创建一个数据库并相应地命名它。在这里,我们将其命名为“GFG”。
第 2 步:在此数据库中创建一个表。我们创建了一个表“Employee”,其中包含“Name”、“Designation”和“Salary”字段。
第 3 步:使用以下给定脚本将数据库与 Perl 文件连接:

#!/usr/bin/perl  
use strict;  
use warnings;  
use DBI;  
  
my $driver = "mysql";  
my $database = "GFG";  
my $dsn      = "dbi:$driver:database=$database";  
my $user     = "root";  
my $password = "";  
my $dbh = DBI->connect($dsn, $user, $password, 
{  
   PrintError       => 0,  
   RaiseError       => 1,  
   AutoCommit       => 1,  
   FetchHashKeyName => 'NAME_lc',  
});  
$dbh->disconnect;  

在上面的脚本中,变量$dsn保存正在加载的数据库,变量$dbh保存数据库句柄对象。