编写Perl代码的模式详细指南

2021年5月4日22:53:13 发表评论 1,472 次浏览

Perl是一种通用的高级解释和动态编程语言。 Perl支持过程序编程和面向对象的编程。从一开始, Perl就是为系统管理和文本处理而开发的, 但是在以后的版本中, Perl能够处理正则表达式和网络套接字等。由于Perl在语法上与其他广泛使用的语言非常相似, 因此它在Perl中更容易编码和学习。

Perl是一种自由格式的语言, 这意味着可以根据用户的要求对其进行编写, 格式化和缩进。 Perl程序由一系列语句, 循环, 子例程等组成, 可轻松在代码内移动。 Perl代码中的每个语句都必须以分号(;)结尾。与其他语言一样, Perl也支持多种编写和执行Perl代码的模式。可以根据它们的写兼容性和执行方式, 通过以下方式对这些模式进行分类：

互动模式
脚本模式
单线模式

这些模式可以使用perl关键字在命令行上运行, 也可以以代码块的形式在Online IDE上运行。 Perl还提供了自己的内置IDE以及安装包。

互动模式

编写Perl代码的交互模式意味着与解释器的直接交互。交互模式是入门的好方法, 因为它有助于逐行检查代码流并简化调试过程。可以使用Perl调试器在命令行中使用Perl中的交互模式。该解释器通常被称为

替换

–读取, 评估, 打印, 循环。

交互模式提供了即时开发和执行代码的功能, 而无需创建用于存储源代码的临时文件。在Perl调试器的帮助下, Perl的内置命令行或Windows命令提示符可用作REPL。可以在以下命令的帮助下在Perl程序上使用此调试器：

perl -de1

该命令将在Perl命令行中打开调试器模式, 如下所示：

在编写Perl代码的交互模式下, 用户必须逐行编写代码, 并且代码会同时执行。

例子：

如果我们需要添加两个数字并显示结果, 则可以通过以下方式在交互模式下完成：

可以在命令行中运行Perl中的交互模式, 而无需使用Perl调试器。这可以通过使用以下命令来完成：

perl -e Code_statement;

该语句使用-e标志来避免创建脚本, 并允许代码在没有调试器的情况下在命令行上运行。

例子：

这种以交互方式编写的方法将不允许用户像在调试器中一样编写多行代码。如果程序较长, 则将不建议使用此模式。

交互模式对于初学者来说是学习编程基础的好方法, 但是如果你使用的是多行代码, 则此模式可能变得笨拙而乏味。

脚本模式

Perl中的脚本模式用于编写Perl程序, 该程序具有多行代码, 并且对于交互模式而言有些复杂。可以在文本编辑器的帮助下使用Perl中的脚本模式来编写Perl程序并将其保存在名为a的文件中。脚本然后使用命令行执行保存的文件。此文件必须以.pl扩展名保存, 并且应放置在目录路径为命令行指定的同一文件夹中。可以使用以下命令在命令行中进一步运行此脚本：

perl File_Name.pl

例子：

代码在文本编辑器(记事本等)中编写, 并保存为Perl_program.pl脚本。

现在, 在命令行中运行以下命令以执行保存为Perl_program.pl的脚本

perl Perl_program.pl

输出如下：

与交互模式不同, Perl中的脚本模式无法单独为表达式生成输出。在"交互"模式下, 将对表达式进行求值并自动显示值, 但在"脚本"模式下, 将对表达式进行求值, 但是直到要求这样做时, 它才会显示任何结果。

脚本模式也在在线IDE中实现, 这些IDE用于编写和执行perl代码, 而无需手动将其存储在文件中。在这些IDE中, 编译时的代码以临时文件的形式存储到内存中, 该临时文件仅在执行代码并在浏览器中打开IDE之前使用。刷新后, 将删除此临时文件, 并释放内存中占用的空间。

与将文件存储在系统内存中的脚本模式相比, 在线集成开发环境使代码的执行更加轻松, 因为它们需要的工作量更少。这使代码的编译和执行速度更快。这些在线IDE尽管使程序员易于使用, 但也具有一定的局限性, 例如, 这些IDE在文件上载到其服务器上之前, 除非该文件上载到某些重要数据中, 否则无法执行文件处理操作。这种类型的文件处理操作可以在命令行编译器上轻松完成。

以下是在在线IDE上运行的两个数字相加的Perl代码示例：

#!/usr/bin/perl
# Program to add two numbers
  
# Assigning values to variables
$var1 = 10;
$var2 = 25;
  
# Evaluating the result
$result = $var1 + $var2 ;
  
# Printing the result
print "Result after addition is: $result" ;

输出如下：