>perl -wde 0
  DB<1> print undef;
Use of uninitialized value in print at (eval 5) [D:/Perl/lib/perl5db.pl:1510] line 2, <IN> line 1.