Perl 文件已打开，但无法读取

为什么会出现这种矛盾？

---

在Windows和ActivePerl上运行。

您必须使用文件句柄来读取它：

File akshay.txt has **opened successfully**
readline() on **unopened filehandle** at akshay.pl line 29.
Use of uninitialized value $line in print at akshay.pl line 30.

my$line=；

您必须使用文件句柄来读取它：

File akshay.txt has **opened successfully**
readline() on **unopened filehandle** at akshay.pl line 29.
Use of uninitialized value $line in print at akshay.pl line 30.

my$line=；

更改此行：

my $line = <$IO>;

my$line=；

到

my$line=；

您正在使用filename变量读取文件内容。使用文件句柄。

更改此行：

my $line = <$IO>;

my$line=；

到

my$line=；

---

您正在使用filename变量读取文件内容。使用filehandle。

如果使用filename变量而不是filehandle变量，则固定代码应如下所示：

my $line = <$IO>;

my$myFile=“akshay.txt”；
打开my$IO，“您使用了filename变量而不是filehandle变量，修复代码如下所示：

my $line = <$IO>;

my$myFile=“akshay.txt”；
打开my$IO，“您试图从文件名而不是文件本身读取数据。您试图从文件名而不是文件本身读取数据。