15、Perl编程实用技巧与示例

Perl编程实用技巧与示例

1. 严格模式与子例程声明

在Perl编程中，开启严格模式（ use strict ）是一个很好的实践。随着程序规模和复杂度的增加，严格模式带来的好处远远超过了必须使用 my 或 our 声明所有变量的不便。

虽然Perl文档建议除了最“随意”的程序外都使用严格模式，但更严格的建议是始终开启严格模式。除非有充分的理由不这样做，否则应在程序顶部开启严格模式。

为了在使用严格模式的同时保持子例程定义位置的灵活性，可以使用 use subs 指令。例如：

use strict;
use subs qw( drawline biodb2mysql );

use subs 指令在程序顶部声明了一系列子例程名称，这些子例程的定义可以出现在程序文件的任何位置。

2. Perl单行命令

Perl的单行命令是一种强大的工具，通过在命令行使用各种开关来执行简单的Perl代码。

• -w开关 ：用于开启警告信息，当Perl检测到可疑的编程实践（如重复定义子例程）时会发出警告。示例程序通常以 #! /usr/bin/perl -w 开头。
• -e开关 ：用于执行单引号内的程序语句，创建了Perl世界中的单行命令。例如