麻烦问一下:undef $/; 的作用是什么?

麻烦问一下:undef $/; 的作用是什么?
#!/usr/local/bin/perl/

undef $/;

my $time1 = time();

open(OUTFILE,"D:/OK.B04010937200706280433510008600004128") or die "can not find the file:$!";#打开文件
binmode (OUTFILE);
open(INFILE,">D:/result/bin.txt");
binmode (INFILE);
while(my $line = <OUTFILE>){
my @packdata = unpack ("H*",$line);
print INFILE "@packdata";
}
close(INFILE);
close(OUTFILE);

my $time2 = time();
print $time2 - $time1,"\n";

麻烦问一下:undef $/; 的作用是什么?

是不是避免换行.

我觉得是避免把二进制中的.
我觉得是避免把二进制中的数据识别为换行符