use strict;
use warnings;

my $newvar=0;
my $undefvar; # we declare, but do not define

if (defined $undefvar){
    $newvar = $undefvar;
}

# $newvar still 0, because $undefvar has been declared,
# but not defined with a value

print "$newvar\n";