Perl读取文件诡异有关问题，求高人解答
Perl读取文件诡异问题，求高人解答
$fullname对应的文件不为空，但是print 报“Use of uninitialized”。
什么原因？
------解决方案--------------------
没啥问题啊，估计是你文件位置不对，如果你要读取的文件跟你这个代码文件不在同一目录，那么就要给全路径，如果在同一目录给个名字就行了，试试下面的代码，打印下结果！
------解决方案--------------------
我运行你代码也没问题，贴出log出来
------解决方案--------------------
打开文件成功了吗？
my $jsdata;
if( open (Myfile, $fullname) )
{
while( <Myfile> )
{
$jsdata .= "$_";
}
print "jsdata:$jsdata\n";
}
else
{
print "Open json file fail.\n";
}
print $jsdata;
$fullname对应的文件不为空，但是print 报“Use of uninitialized”。
什么原因？
Perl
------解决方案--------------------
没啥问题啊，估计是你文件位置不对，如果你要读取的文件跟你这个代码文件不在同一目录，那么就要给全路径，如果在同一目录给个名字就行了，试试下面的代码，打印下结果！
my $jsdata;
my $fullname = 'result1.txt';
open Myfile, $fullname or die "$Open json file fail.\n$!";
while( <Myfile> )
{
$jsdata .= "$_";
}
print "jsdata:$jsdata\n";
close(Myfile);
print $jsdata;
------解决方案--------------------
我运行你代码也没问题，贴出log出来
------解决方案--------------------
打开文件成功了吗？