什么是调试？

执行程序前，一切看起来很好。

执行程序后，某些东西变成出乎意料、不正确的状态。

任务就是找出在哪一点出了什么问题并改正它。

什么是编程，什么是bug？

基本上，编程是通过在变量里搬动数据来一点点改变世界。

在程序的每一步，我们改变程序中某变量的一些数据或者“现实世界”的一些东西。（比如磁盘里或者屏幕上）

当你写程序时，你每一步安排：什么值应该赋给哪个变量。

bug就是当你认为你把值X放入某个变量，而实际上值Y被放入了。

在某一点，通常是程序结束，你会发现它因为程序打印了不正确的值。

程序执行时，它可能导致出现警告或者程序异常终止。

怎么调试？

最直接的调试办法是运行程序，在每一步检查是否所有的变量包含了期望的值。你可以通过使用调试器或者在程序中嵌入print语句后，来检查输出。

Perl带了很强大的命令行调试器。我建议学一下，不过刚开始可能会比较恐怖。 我准备了一个视频来演示Perl内置调试器的基本命令。

集成开发环境，诸如Komodo，Eclipse和Padre, the Perl IDE 带了一个图形界面的调试器。有时间我也会准备一个他们的视频。

打印语句

很多人还在用老掉牙的办法去在代码里加入打印语句。

如果一种语言编译和构建很花时间，打印语句就是一个很坏的办法去调试代码。 Perl不是这样，即便是很大的应用程序也可以在几秒钟编译并开始运行。

添加打印语句时，需要记住在值周围加上分隔符。这样可以发现值之前或之后有空白可能导致问题的情况。 不加分隔符的话，很难发现他们：

标量值可以如此打印：

print "<$file_name>\n";

这里小于号和大于号只是使读者易于辨识变量的真实内容：

<path/to/file
>

如果打印如上结果，你会很快发现$file_name变量后有个拖尾的新行符。或许是你忘了调用chomp。

复杂数据结构

我们甚至还没学标量，但是让我来往前跳一下来为您展示如何打印复杂数据结构的内容。 如果你在Perl教程中读到这一部分，你可以希望跳到下一章节，之后再回来。现在这不是太大问题。 否则，继续读下去。

对于复杂数据结构（引用，数组和哈希），你可以使用Data::Dumper

use Data::Dumper qw(Dumper);

print Dumper \@an_array;
print Dumper \%a_hash;
print Dumper $a_reference;

这会打印类似如下内容，它有助于了解变量的内容，但是只是显示了一个通用的变量名比如$VAR1和$VAR2。

$VAR1 = [
       'a',
       'b',
       'c'
     ];
$VAR1 = {
       'a' => 1,
       'b' => 2
     };
$VAR1 = {
       'c' => 3,
       'd' => 4
     };

我建议像这样加一些代码打印出变量名：

print '@an_array: ' . Dumper \@an_array;

这将得出：

@an_array: $VAR1 = [
        'a',
        'b',
        'c'
      ];

或者像这样使用Data::Dumper：

print Data::Dumper->Dump([\@an_array, \%a_hash, $a_reference],
   [qw(an_array a_hash a_reference)]);

得出

$an_array = [
            'a',
            'b',
            'c'
          ];
$a_hash = {
          'a' => 1,
          'b' => 2
        };
$a_reference = {
               'c' => 3,
               'd' => 4
             };

还有更漂亮的办法打印数据结构，但是这里Data::Dumper已经足够满足我们的需求，而且每个perl版本都预装了。 我们以后会讨论其他方法。