MySQL&Perl,便利之合_MySQL

Perl

　　by Georges Tarbouriech
　　
　　What about this nice pair ?
　　MySQL是一种关系型数据库系统(RDBMS),其主页为http://www.mysql.com/。它由GNU GPL发布并供免费使用，请注意阅读版权声明。 它可以在许多平台上工作，既作服务器同时又是客户端。除MySQL之外还有一些其它的自由软件性质的RDBMS,在这里不作任何比较，本文仅讨论MYSQL。我们也不将其与那些大型商业数据库像 Informix,Oracle,Sybase等作比，有足够理由相信MySQL是Internet上使用最广泛的数据库系统之一。在这篇文章里我们使用的MySQL版本是3.23.36。现在的稳定发行版本是3.23.46，而苦苦等待的4.0版仍在测试之中。人们可以从网上下载到它们的源代码或包文件。
　　为了将MySQL与Perl结合使用，你还需要些东西: Perl DBI模块。至少你应该下载DBI, Msql-Mysql-modules, Data-Dumper和Data-ShowTable等。
　　本文不介绍它们的安装过程，因为那很简单，同时包中的说明文件已经提供了你需要知道的所有内容。
　　Perl全称是实用摘录与报告语言(Practical Extraction and Report Language)。 最初它用于文件处理（分析，摘要...），很快它的功能就有了扩展。 你几乎可以用它来做任何任何事情：系统管理，CGI脚本程序以及数据库接口程序。
　　Perl包含于许多(如果不能称是全部的话)Unix发行版本中，它们中有些是免费的，有些不是。本文写作时，稳定的版本是5.6.1，版本5.7.2在测试中。本文采用的是5.005_03,很不错的一个版本，尽管老点。如果你的机子还没有装Perl,你可以从http://www.perl.com/下载。Perl提供了许多模块，用它们几乎可以完成任何事，你可以从这个网站的CPAN栏目找到它们。
　　最后一点，为了让这两种软件真正开始工作，你还需要一个web服务器。Apache应该是一个不错的选择，它集成于多种Unix系统中。如果你还没有，可以到http://www.apache.org/下载。
　　
　　　
　　使用的范例
　　你也许已经注意到LinuxFocus杂志有多种语言的版本。这就意味着作为编辑需要同时管理新文章以及它的译文版本。一般情况下，我们可以看到大约200篇文章，平均每篇文章有5个语言的版本，这样产生了大约1000篇文章并且还在继续增长！这些文章需要被存档，格式标准化，总结及摘要.....应该怎么做这些事？当然，用Perl!
　　我们的总编Guido Socher编写的许多perl程序使我们的工作变的简单了许多，他写过一本三部头的 Perl教程和一本评论Perl的书。参照本文末尾的参考文献部分。
　　Javi,我们的西班牙编辑，用Perl编写了一个程序来管理翻译进度。
　　Atif是我们的明星作者，他来自perl王国，所以他的母语就是Perl。 他同时也撰写关于MySQL方面文章，致力于一个WEB管理工具改进工作。同样你可以在参考文献部分找到他。
　　总之，如果你在寻找一个Perl世界，加入LinuxFocus。
　　我是LinuxFocus法文版的编辑之一，我更懒，于是创建了自己的LinuxFocus数据库，猜猜用什么: MySQL 和Perl!
　　
　　　
　　建立数据库
　　首先你应当已经正确安装了MySQL，并配置好用户密码。关于安装并不是本文讨论的内容，MySQL自带的大量文档已经描述了所有细节。
　　用mysql.server启动MySQL服务器,这个命令同时调用 safe_mysqld 守护进程，因此你可以给它传参。
　　用
　　
　　mysql -h host -u user -p
　　
　　连接到服务器，如果服务器就装在你本机上，就不用加参数-h host。
　　输入密码无误后，你将连接到服务器。现在可以建立自己的数据库了。
　　在mysql命令提示符状态下输入
　　CREATE DATABASE lf;
　　
　　，这个是我们的示范数据库(lf代表LinuxFocus)，你可以根据你的需要命名成别的。接下来就是给用户授权了，当然首先你要有足够的权限（你需要用有administrator权限的用户连接）。如果需要让某个用户管理数据库，通过
　　GRANT ALL ON lf.* TO username;
　　
　　给他授权。输入
　　USE lf
　　
　　选择刚才创建的数据库，并创建一张表。在这里我们创建的表是trissue,命令格式为：
　　CREATE TABLE trissue (num INTEGER UNSIGNED, category VARCHAR(25), title VARCHAR(40), author VARCHAR(20), en VARCHAR(20), es VARCHAR(20), fr VARCHAR(20),de VARCHAR(20), nl VARCHAR(20), ru VARCHAR(20), tk VARCHAR(20), issue VARCHAR(20));
　　
　　通过下面的命令可以检查一下我们刚才创建的表内容是否正确
　　USE lf
　　SHOW TABLES;
　　DESCRIBE trissue;
　　
　　
　　下面我们需要在表中填入数据，往一张空表中导入数据的最简单的方法就是使用一个带TAB分隔符的文本文件。如果文本文件已经准备好，输入
　　LOAD DATA LOCAL INFILE "maindb.txt" INTO TABLE trissue;
　　
　　如果你的文本文件没有问题，那么现在这张表就已经填好数据，你可以通过输入以下命令检验一下：
　　SELECT * FROM trissue;
　　
　　这将导致显示一个很长的列表。现在，你就可以进行查询来获得任何类型的数据了。
　　ok,到现在为止，我们仅仅用了MySQL，就可以做任何事情，那么，用Perl来做什么？
　　
　　　
　　Perl的工作
　　Perl可以帮助我们自动进行查询，将结果显示到一个WEB浏览器上，等等。重复一遍，首先需要为Perl安装正确的模块使之能与MYSQL联合工作。
　　现在我们用Perl来写一个CGI脚本。它的作用是将Perl与HTML技术结合以实现查询数据库并将结果格式化输出。
　　我们用一个简单的脚本来查询某一作者的所有文章，显示文章的编号，分类，标题，不同语言版本的翻译者的姓名，发表文章的杂志期号。
　　你可以将这个脚本当作一个模块使用，但是注意这个例程并不是一个非常可靠的程序。你可以从下面的链接下载到一个有详细注释的版本。=>here<=.
　　
　　
　　
　　#!/usr/bin/perl -Tw
　　# First, we say this is a "Tainted" Perl script.
　　#
　　# This is a comment
　　# db consult
　　#
　　# We use the Perl DBI module
　　use DBI;
　　
　　# As cgi :
　　use CGI qw(param());
　　
　　print <　　
　　Content-type: text/html
　　
　　
　　
　　
　　
　　
　　
　　
　　

# Here comes the button's title for the launching page

　　
　　下面用脚本去查询数据库。
　　

Search by author

　　
　　Author name : 　　type="text" size="30" name="author">　　value="Search...">
　　
　　
　　END_of_start
　　
　　
　　if (param("author") ne '') {
　　$author = param("author");
　　
　　$autsrch.='"';
　　$autsrch.=$author;
　　$autsrch.='"';
　　
　　# We connect to the database named lf as user doe
　　
　　$dbh = DBI->connect("DBI:mysql:lf","doe",'');
　　
　　$sth = $dbh->prepare("
　　select *
　　from trissue
　　where
　　author = $autsrch
　　");
　　
　　$sth->execute;
　　
　　接着用脚本去显示查询结果。如果我们不限制查询条件，将会显示出数据库的所有内容，如果我们提供一个作者姓名，则会显示出与该作者相关的所有文章。当你的数据库有上千条记录时，不推荐显示出所有内容！
　　print <　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　
　　END_suite
　　
　　while( ($num,$category,$title,$author,$en,$es,$fr,$de,$nl,$ru,$tk,$issue) =$sth->fetchrow() ) {
　　print "";
　　print "";
　　print "";
　　print "";
　　print "";
　　print "

Num	Category	Title	Author	En	Es	Fr	De	Nl	Ru	Tk	Issue
$num	$category	$title	$author	$e perl mysql 服务器 sql apache linux go html 写下你的评论吧 ! 吐个槽吧,看都看了 会员登录 | 用户注册 推荐阅读 char Android 新闻App的本地服务器搭建教程 本文介绍了在开发Android新闻App时，搭建本地服务器的步骤。通过使用XAMPP软件，可以一键式搭建起开发环境，包括Apache、MySQL、PHP、PERL。在本地服务器上新建数据库和表，并设置相应的属性。最后，给出了创建new表的SQL语句。这个教程适合初学者参考。 ... [详细] 蜡笔小新   2023-12-14 17:15:19 ip Nginx使用AWStats日志分析的步骤及注意事项 本文介绍了在Centos7操作系统上使用Nginx和AWStats进行日志分析的步骤和注意事项。通过AWStats可以统计网站的访问量、IP地址、操作系统、浏览器等信息，并提供精确到每月、每日、每小时的数据。在部署AWStats之前需要确认服务器上已经安装了Perl环境，并进行DNS解析。 ... [详细] 蜡笔小新   2023-12-14 19:42:01 ip 解决Mac上无法使用localhost连接mysql的问题 本文介绍了在Mac上搭建php环境后无法使用localhost连接mysql的问题，并通过将localhost替换为127.0.0.1或本机IP解决了该问题。文章解释了localhost和127.0.0.1的区别，指出了使用socket方式连接导致连接失败的原因。此外，还提供了相关链接供读者深入了解。 ... [详细] 蜡笔小新   2023-12-13 17:48:58 go mac php错误日志配置方法及错误级别修改 本文介绍了在mac环境下配置php错误日志的方法，包括修改php.ini文件和httpd.conf文件的操作步骤。同时还介绍了如何修改错误级别，以及相应的错误级别参考链接。 ... [详细] 蜡笔小新   2023-12-12 11:59:08 ip 一句话解决高并发的核心原则 本文介绍了解决高并发的核心原则，即将用户访问请求尽量往前推，避免访问CDN、静态服务器、动态服务器、数据库和存储，从而实现高性能、高并发、高可扩展的网站架构。同时提到了Google的成功案例，以及适用于千万级别PV站和亿级PV网站的架构层次。 ... [详细] 蜡笔小新   2023-12-12 10:56:24 go 每天收获一点点Hadoop概述 一、Hadoop来历Hadoop的思想来源于Google在做搜索引擎的时候出现一个很大的问题就是这么多网页我如何才能以最快的速度来搜索到，由于这个问题Google发明 ... [详细] 蜡笔小新   2023-12-14 18:58:01 get 【译】发送表单数据 这是原文链接：sendingformdata许多情况下，我们使用表单发送数据到服务器。服务器处理数据并返回响应给用户。这看起来很简单，但是 ... [详细] 蜡笔小新   2023-12-14 16:19:10 cookie 如何限制php数据库链接数和连接超时时间？ 本文介绍了如何使用php限制数据库插入的条数并显示每次插入数据库之间的数据数目，以及避免重复提交的方法。同时还介绍了如何限制某一个数据库用户的并发连接数，以及设置数据库的连接数和连接超时时间的方法。最后提供了一些关于浏览器在线用户数和数据库连接数量比例的参考值。 ... [详细] 蜡笔小新   2023-12-14 14:06:10 cookie Hibernate配置lazy=false时无法加载数据的问题解决方法 本文介绍了在Hibernate配置lazy=false时无法加载数据的问题，通过采用OpenSessionInView模式和修改数据库服务器版本解决了该问题。详细描述了问题的出现和解决过程，包括运行环境和数据库的配置信息。 ... [详细] 蜡笔小新   2023-12-14 13:59:45 cookie Oracle Database 10g许可授予信息及高级功能详解 本文介绍了Oracle Database 10g许可授予信息及其中的高级功能，包括数据库优化数据包、SQL访问指导、SQL优化指导、SQL优化集和重组对象。同时提供了详细说明，指导用户在Oracle Database 10g中如何使用这些功能。 ... [详细] 蜡笔小新   2023-12-14 13:12:10 get Hibernate基础映射 在说Hibernate映射前，我们先来了解下对象关系映射ORM。ORM的实现思想就是将关系数据库中表的数据映射成对象，以对象的形式展现。这样开发人员就可以把对数据库的操作转化为对 ... [详细] 蜡笔小新   2023-12-14 10:57:47 get Linux下Kafka单机安装配置方法（实操成功） 本文介绍了在Linux下安装和配置Kafka的方法，包括安装JDK、下载和解压Kafka、配置Kafka的参数，以及配置Kafka的日志目录、服务器IP和日志存放路径等。同时还提供了单机配置部署的方法和zookeeper地址和端口的配置。通过实操成功的案例，帮助读者快速完成Kafka的安装和配置。 ... [详细] 蜡笔小新   2023-12-12 18:14:32 get 大数据Hadoop生态(20)MapReduce框架原理OutputFormat的开发笔记 本文介绍了大数据Hadoop生态(20)MapReduce框架原理OutputFormat的开发笔记，包括outputFormat接口实现类、自定义outputFormat步骤和案例。案例中将包含nty的日志输出到nty.log文件，其他日志输出到other.log文件。同时提供了一些相关网址供参考。 ... [详细] 蜡笔小新   2023-12-10 11:44:06 get 目录浏览漏洞与目录遍历漏洞的危害及修复方法 本文讨论了目录浏览漏洞与目录遍历漏洞的危害，包括网站结构暴露、隐秘文件访问等。同时介绍了检测方法，如使用漏洞扫描器和搜索关键词。最后提供了针对常见中间件的修复方式，包括关闭目录浏览功能。对于保护网站安全具有一定的参考价值。 ... [详细] 蜡笔小新   2023-12-09 23:30:30 cookie Apache Shiro 身份验证绕过漏洞 (CVE202011989) 详细解析及防范措施 本文详细解析了Apache Shiro 身份验证绕过漏洞 (CVE202011989) 的原理和影响，并提供了相应的防范措施。Apache Shiro 是一个强大且易用的Java安全框架，常用于执行身份验证、授权、密码和会话管理。在Apache Shiro 1.5.3之前的版本中，与Spring控制器一起使用时，存在特制请求可能导致身份验证绕过的漏洞。本文还介绍了该漏洞的具体细节，并给出了防范该漏洞的建议措施。 ... [详细] 蜡笔小新   2023-12-09 19:58:36 爱与嫉妒咋 这个家伙很懒，什么也没留下！ Tags | 热门标签 range php5 timezone go cPlusPlus audio java hashset usb javascript ip object uri metadata foreach rsa char get solr sum include node.js byte 数组 merge cookie express python3 typescript split RankList | 热门文章 1如何查看本地端口被进程占用的情况? 2这个函数的定义不太明白，希望大牛指点 3idea 正则表达式搜索替换应用详解_正则表达式 4前端学习（1762）：前端调试值之如何让浏览器模拟传感器数据 5《春思赠人》翻译 原文赏析诗人唐柳中庸 6PHP+golong最近一些不错的机会 703 | 高性能IO模型：为什么单线程Redis能那么快？ 8jsp学习与提高（三）——JSP Cookie 处理 9springboot2.0 整合 Mybatis (springboot2.0版本) 10ARM：嵌入式系统之WDT中断实验 11小苗快速培养盆景苗方法_盆景初接触，如何快速地学会盆景造型技法，黄杨小苗是最好的老师... 12判断给定图是否存在合法拓扑序列 （拓扑排序及其优化） 13多线程还是多进程的选择及区别 14无服务器_云原生数据湖架构中的无服务器 Kafka 15mongod无法启动 PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | 在线工具 Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved | 京公网安备 11010802041100号 | 京ICP备19059560号-4 | PHP1.CN 第一PHP社区 版权所有