Help for this page

Select Code to Download


  1. or download this
    use warnings;
BEGIN { $^W = 0; }
my $s = '' . undef();  # Use of uninitialized value
  2. or download this
    no warnings;
BEGIN { $^W = 1; }
my $s = '' . undef();  # [No warnings]
  3. or download this
    use strict;
use warnings;
...
test {
    print "@_";   # Use of uninitialized value
};