8 lines
160 B
Perl
8 lines
160 B
Perl
$variable1 = 5;
|
|
undef $variable1;
|
|
|
|
if (defined $variable1) {
|
|
print "\$variable1 is defined.\n";
|
|
} else {
|
|
print "\$variable1 is not defined.\n";
|
|
} |