linux安装配置手册 (19).pdf

《linux安装配置手册 (19).pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、下载第19章Perl语言如果你需要下列问题的一个快速解决方案请查阅节号建立一个Perl程序19.2.1运行一个Perl程序19.2.2把程序输出在下一行显示19.2.3接受命令行输入19.2.4给变量赋值19.2.5使用某个变量的值19.2.6测试true（真）或者false（假）19.2.7测试文件19.2.8使用数学计算19.2.9数据值比较19.2.10字符串处理19.2.11使用数组19.2.12使用for语句19.2.13使用foreach语句19.2.14使用if语句19.2.15使用unless语句19.2.16使用until语句19.2.17使用while语句19.2.

2、18把数据写入一个文件19.2.19从一个文件中读出数据19.2.2019.1概述在某些情况下，shell命令脚本程序（在第18章讨论）可以很容易地胜任用户需要完成的任务。但是在另外一些情况下，用户可能就需要一些功能更强的东西。比编写shell命令脚本程序更高的一个阶段就是学会使用Perl（PracticalExtractionandReportLanguage的首字母缩写，意思是实用抽象总结与报告语言）语言。这种语言是shell命令脚本程序编程语言和C语言的一种混合产物，它综合了这两者的长处。在需要编写运行于Web上的应用程序的Linux系统管理员中，Perl语言特别受欢迎。19.1

3、.1为什么使用Perl语言根据下面的清单中各个项目对用户吸引力的不同，可以说有使用或者不使用Perl语言都有许多道理：¥Perl语言的结构类似于编程使用的C语言，它并不是一个完全陌生的新结构。¥就诸如每行程序的长度、变量名的长度和子程序嵌套深度等方面而言，其语法规则相当松散（可以说是不存在）。¥Perl语言解释器能够检查不安全的数据来源，这对任何系统管理员来说都是极其重要的帮助。222Linux安装与配置简明手册下载¥如果你要在shell命令脚本程序中使用大量的管道操作，在各种程序之间来回转悠，那么Perl语言就将是一个比较简洁的选择。19.1.2Perl语言编程示范我们下面编写一个示

4、范程序，说明使用Perl语言编程的过程以及这种语言是如何工作的。需要考虑的因素和好的经验都与编写shell命令脚本相同或者相似。1.程序的功能这个Perl程序的功能是输入用来建立一个小电话号码本的数据，并把这些数据保存到一个文件中；使用同样的应用程序还可以往这个文件中添加数据。2.准备编写程序在开始编写程序之前，考虑好如何把它的各个部分有机地组合在一起是很重要的。这样可以避免发生因为某些模块无法实现应用要求而重新编写大块程序的情况。就我们这个例子来说，程序需要计划考虑的问题有以下几方面：1)这个程序需要接受什么样的数据？它最少应该包括一个姓名和一个电话号码。2)姓名应该是什么格式？为了

5、今后的灵活性，把它分断为姓、名两个部分。3)电话号码应该是什么格式？包括地区码和7位数字。在屏幕上显示一个示范格式，这样用户就可以知道怎样输入它们了。4)怎样通知程序数据输入过程的结束？用户一般不可能在事先就知道他或她有多少项数据要输入。因此使用一个遍历循环，当预定的退出条件满足时，退出程序循环。5)应该使用什么样的退出条件？与其强迫用户记住某个退出循环时必须要输入的特定单词，不如在程序中给出一个提示，回答“y”表示继续输入数据，回答“n”则退出。6)要有错误检查，保证用户对查询做出了回答。7)我们的这个例子是建立一个电话号码的数据库，因此应该在进行文件处理的时候，允许人们能够随时把新

6、的电话号码记录添加到数据库中。所以，文件的打开和写操作策略应该是“如果文件不存在，建立它；如果文件已存在，在其末尾添加数据”。3.建立程序文件建立这个程序首先要打开并编辑一个文本文件，就像编写一个命令脚本程序那样：1)选择准备在哪里保存和建立这个程序。用来保存命令脚本程序的“~/bin”子目录也是保存Perl程序的好地方。如果用户喜欢把东西分门别类地保存，可以考虑分别建立子目录“~/bin/shell”和子目录“~/bin/perl”。对这个例子来说，我们把文件保存在~/bin子目录中。2)把路径切换到~/bin子目录。3)使用喜欢的文本编辑器程序编辑这个文件——比如说，输入“viph

7、onebook”命令。相关解决方案请查阅节号编写一个命令脚本程序18.2.14.编写程序文件现在开始编写程序本身的内容：1)因为每个Perl程序本身都是文本文件，所以它的第一行都是一个指向Perl解释器的声明语句，告诉shell该文件包含着Perl代码。所以phonebook文件的第一行内容就是：第19章Perl语言223下载#!/usr/bin/perl2)在开始主要的程序循环之前，先给用户显示该程序的使用方法，如下所示：print"Fore