Has anyone ever tried using $^W. I never have but it from "perl -d -e 0" I've done this: print "$junk" --- No output $^W = 1 print "$junk" --- Use of uninitialized value in string at (eval 7)C:/Perl/lib/perl5db.pl:1521 line 2 -Jim