也就是说，perl 在每次使用<>操作符读文件的时候，会先从$/中获得一个叫做“分隔符”的东西，并以该分隔符为标记来读取文件，如果按默认的$/来说，这个分割符就是一个换行符，所以，默认时，<>操作符才会每次读取一行文本。
在给出的例子中，有这样一句 ：undef $/ ，也就是将$/设置为未定义的值，这样一来呢，$/就不再起作用了，因此，大家可以看到，第二次进行同样的操作的时候， <>操作符就不再是只读一行而是将文件内容全部读出来了。
接下来看一个会受到$/影响的内置变量，还是先说实例：
$text = "C:test.txt";
open FH,$text or die "can't open:$!";
while () {
print "line $. is:$_";
}
close FH;
先来看循环中的：print "line $. is:$_"
程序的作用是读文件，并且，将文件逐行赋值给$_（因为只用了<>操作符而没有指定内赋值变量，因此，默认就是赋值给了$_）；
但是这里除了$_，还有一个变量“$.”
我们来看一下结果：
line 1 is:111111111111111111111111111
line 2 is:222222222222222222222222222
line 3 is:333333333333333333333333333
可见，变量$.的作用是一个类似计数器的东西，但是，为什么刚开始我说$.会受到$/变量的影响呢 ？
将上面的例子稍做修改，再看一下：
$text = "C:test.txt";
undef $/; # 注意，多加了这一行
open FH,$text or die "can't open:$!";
while () {
print "line $. is:$_";
}
close FH;
第二行多加了一句undef $/; ，上面已经说过它的作用了，来看一下这段程序运行的结果：
line 1 is:111111111111111111111111111
222222222222222222222222222
333333333333333333333333333
本来应该是三行的文本，不但被一次性打印出来，而且还指明了“line 1”（看来程序认为这个文本只有一行），为什么 ？
这是因为$.变量并不是一个单纯的行计数器，确切地说，可以说$.是一个对$/计数器，我们再来看一段程序大概就会明白了：
$text = "C:a.txt";
$/ = ";"; # 注意这里，这里我并将$/设置为未定义，而是给其赋值为分号
open FH,$text or die "can't open:$!";
while () {
print "line $. is:$_ ";
}
close FH;
再看一下C盘下的a.txt的内容：
ddd;bbb;ccc;fff;eee;
就这么简单了。
看一下运行结果：
line 1 is:ddd;
line 2 is:bbb;
line 3 is:ccc;
line 4 is:fff;
line 5 is:eee;
看过这段程序应该就明白了吧。
好，$.已经讲得差不多了，接下来再说一个它的特性，仍然是看程序说话：
$text = "C:test.txt";
open FH,$text or die "can't open:$!";
while () {
print "line $. is:$_ ";
}
print " ",$.;
close FH;
print " ",$.;
