当前位置：极客教程 > Perl > Perl 教程 > Perl 错误处理

Perl 错误处理

Perl 错误处理

Perl中的错误处理是指对由于代码或编译器中的某些错误而导致执行困难的程序采取适当的措施。进程很容易出错。例如，如果打开一个不存在的文件就会产生错误，或者访问一个没有被声明的变量就会产生错误。

如果发生错误，程序就会停止，因此使用错误处理，我们可以采取适当的措施，而不是完全停止程序。错误处理是任何容易出错的语言的一个主要要求。

错误可以按其发生的时间进行分类。

  1. 编译时错误
  2. 运行时错误

编译时错误： 它是一种错误，如语法错误或缺少文件引用，使程序不能成功编译。

运行时错误： 是指在程序运行时发生的错误，这些错误通常是逻辑错误，产生不正确的输出。

Perl中的错误处理

Perl提供了两个内置函数来产生致命的异常和警告，它们是。

  1. die()
  2. warn()

die() : 在发生致命错误时发出信号，即不允许有关的程序继续运行。

例如，用 open() 访问一个文件时，在进行其他文件操作之前，会告知打开操作是否成功。

open FILE, "filename.txt" or die "Cannot open file: $!\n";
Perl

注意： $！ 是一个预定义的变量，返回系统在出错时返回的错误信息。

warn() : 与 die() 函数不同， warn() 产生一个警告而不是一个致命的异常。

比如说

open FILE, "filename.txt" or warn "Cannot open file: $!\n";
Perl

其他可用于处理错误的方法

  • if 语句
  • unless函数
  • 错误”:try “模块

if语句： 一个代码块中的语句只有在条件为真时才会被执行。

if(-e filename)){
  print "File exists";
  
} else {
  die "Cannot open the file.!"
}
Perl

unless函数： 代码块中的语句只有在表达式返回错误时才会被执行。

unless(-e filename) {
   die "File Does not Exist!!";
}
Perl

错误’:try’： 它类似于Java编程语言中的try和catch块。

use Error ':try';
  
try{
  open FILE, "filename.txt" or die "File cannot be opened: !";
  while () {
      # Do something
   }
   close FILE;
} catch Error::Simple with {
     myerr = shift;
     print "ERROR: $err";
};
Perl

模块内的错误

到目前为止，我们已经看到了Perl是如何处理和通知程序员错误的，但是如果一个模块中出现了错误，需要通知程序员怎么办？这种错误会给所有导入该模块的代码的执行带来困难。

例如，你做了一个模块，比方说 test.pm ，我们做了一个错误的计算，所以错误信息将被抛出，如下所示。

package test;
sub functionName
{
   warn "Error in module!"
}
1;
Perl
use test;
functionName();
Perl

输出

Error in module! at test.pm line 6
Perl

这种错误处理技术可以被程序员用来纠正模块中的所有错误。 Carp模块() 可以用来提供报告模块内错误的方法。

carp模块

它是模块的警告和死亡的替代方法。它对用户定义的模块很有用，因为它们的作用有点像 die() 和 warning() ，但有一个由程序员添加的信息。

这个Carp模块提供了一些函数，它们是：

  1. carp()
  2. cluck()
  3. croak()
  4. 忏悔()

carp()函数： 这个函数的工作原理类似于warning函数，在不退出脚本的情况下打印出用户给出的信息。

例子

package test;
use Carp;
  
sub functionName
{
   carp "Error in module!"
}
1;
Perl
use test;
functionName();
Perl

输出

Error in module!  at test.pm line 8
Perl

cluck()函数： 这个函数产生一个上下文，是调用栈中每个调用的摘要。它遵循与 carp() 函数相同的过程，但它打印的是导致调用特定函数的所有模块的堆栈。

例子

package Test;
use Carp qw(cluck);
  
sub function_name {
    cluck "Error in module!";
}
1;
Perl
use Test;
function_name();
Perl

输出

Error in module! at Test.pm line 5
   Test::function_name() called at test.pl line 2
Perl

croak()函数： 该函数与 die() 函数类似，只是它产生的信息更短，报告的错误来自你的模块被调用的地方。
例子

package Test;
use carp;
  
sub functionName {
    croak "Error in module!";
}
1;
Perl
use Test;
functionName();
Perl

输出

Error in module! at test.pl line 2
Perl

confess()函数： 该函数与 cluck() 函数类似。它调用die函数，然后打印出导致调用特定函数的所有模块的堆栈。
示例 。

package Test;
use Carp;
  
sub functionName {
    confess "Error in module!";
}
1;
Perl
use Test;
functionName();
Perl

输出

Error in module! at Test.pm line 5
   Test::functionName() called at test.pl line 2
Perl

Python教程

Python 教程

Python 教程
Tkinter 教程

Tkinter 教程
Pandas 教程

Pandas 教程
NumPy 教程

NumPy 教程
Flask 教程

Flask 教程
Django 教程

Django 教程
PySpark 教程

PySpark 教程
wxPython 教程

wxPython 教程
SymPy 教程

SymPy 教程
Seaborn 教程

Seaborn 教程
SciPy 教程

SciPy 教程
RxPY 教程

RxPY 教程
Pycharm 教程

Pycharm 教程
Pygame 教程

Pygame 教程
PyGTK 教程

PyGTK 教程
PyQt 教程

PyQt 教程
PyQt5 教程

PyQt5 教程
PyTorch 教程

PyTorch 教程
Matplotlib 教程

Matplotlib 教程
Web2py 教程

Web2py 教程
BeautifulSoup 教程

BeautifulSoup 教程

Java教程

Java 教程

Java 教程

Web教程

HTML 教程

HTML 教程
CSS 教程

CSS 教程
CSS3 教程

CSS3 教程
jQuery 教程

jQuery 教程
Ajax 教程

Ajax 教程
AngularJS 教程

AngularJS 教程
TypeScript 教程

TypeScript 教程
WordPress 教程

WordPress 教程
Laravel 教程

Laravel 教程
Next.js 教程

Next.js 教程
PhantomJS 教程

PhantomJS 教程
Three.js 教程

Three.js 教程
Underscore.JS 教程

Underscore.JS 教程
WebGL 教程

WebGL 教程
WebRTC 教程

WebRTC 教程
VueJS 教程

VueJS 教程

数据库教程

SQL 教程

SQL 教程
MySQL 教程

MySQL 教程
MongoDB 教程

MongoDB 教程
PostgreSQL 教程

PostgreSQL 教程
SQLite 教程

SQLite 教程
Redis 教程

Redis 教程
MariaDB 教程

MariaDB 教程

图形图像教程

Vulkan 教程

Vulkan 教程
OpenCV 教程

OpenCV 教程

大数据教程

R语言 教程

R语言 教程

开发工具教程

Git 教程

Git 教程
VSCode 教程

VSCode 教程
Docker 教程

Docker 教程
Gerrit 教程

Gerrit 教程
Excel 教程

Excel 教程

计算机教程

Go语言 教程

Go语言 教程
C++ 教程

C++ 教程

Perl 教程

登录

找回密码？

注册