use strict; use warnings; my $newvar=0; if (defined $undefvar) { $newvar = $undefvar; }