Perl – 用调试器列出你的程序

完美的程序很难在第一次尝试中获得。他们必须通过各种调试步骤来修复所有错误。有两种类型的错误——语法错误和逻辑错误。语法错误很容易修复并且可以快速发现。另一方面，逻辑错误很难找到和修复。因此，需要调试器来修复这些错误。

在 Perl 中，调试器是一个逐行执行程序的环境。此过程也称为单步执行程序。要进入调试器，请遵循下面给出的语法：

句法：

perl -d 

调试示例程序：

#!/usr/bin/perl -w
  
# Perl program for a simple calculator
use strict;
      
my $op;
my $num1;
my $num2;
my $result;
my $flag;
      
calculator();
      
sub calculator 
{
    print "Enter operation you want to perform -Add, Sub, Mult, Div - ";
    chomp($op = <>);
    print "Enter first number: ";chomp($num1 = <>);
    print "Enter second number: ";chomp($num2 = <>);
  
    # Check for arithmetic operation
    if ($op =~ /^a/) {
        $result = $num1 + $num2;
    } elsif ($op =~ /^s/) {
        $result = $num1 - $num2;
    } elsif ($op =~ /^m/) {
        $result = $num1 * $num2;
    } elsif ($op =~ /^d/) {
        $result = $num1 / $num2;
    }
  
    # Print the answer of above operation
    print "Result: $result\n";
  
    # Calling the function recursively
    print "Do another calculation ? ";chomp($flag = <>);
    if ($flag =~ /^y/) {
        calculator();
    } else {
        print "Thank You !!\n";
    }
}

使用调试器列出示例代码

1. 'l' 命令：
   'l' 命令让我们打印脚本的一部分。我们可以使用这个命令的几个版本——
   • 使用 'l' - 从光标位置显示 10 行脚本。
   • 使用 l 4+6 – 显示从第 4 行开始的 6 行脚本。
   • 使用 l 4-7 – 显示脚本的第 4 到 7 行。
   • 使用 l 20 – 在第 20 行显示脚本。
   • 使用 l foo – 显示大约 foo()函数的前 10 行。

   

2. '-' 命令 ：
   在当前行之前输出 10 行脚本。假设您当前在第 20 行，那么将显示第 9 到 19 行。

   

3. 'w' 命令：
   添加一个监视表达式。
   句法：

   w $variable_name

   

4. '//' 和 '？？' ：
   // 和 ？？在脚本中搜索给定的模式。 /pattern/ 搜索正向的模式，而 ?pattern?从光标当前位置向后搜索模式。
   句法：

   /pattern/ or ?pattern?

   

5. 'S' 命令：
   此命令列出所有与给定模式不匹配的子例程。
   句法：

   S expression