继续请教perl的问题，谢谢

jason680

回复 1# 290702500

would you like to try...

use strict;
use warnings;

my $test;    # or    #my $test
if(not defined($test)){
  print "not defined \$test\n";
}
print "$test\n";

   

jason680

回复 1# 290702500

Use of uninitialized value in pattern match (m//) at /home/bz/somescript_NEW/usrForDef.pl line 380, <LEF> line 465.

$_    <==== uninitialized (for your code)
or other variable uninitialized