##
use strict;
##
##
use warnings;
use strict;
my $x;
print "$x\n";
##
##
Use of uninitialized value $x in concatenation (.) or string at script.pl line 4.
##
##
use warnings;
use strict;
print "$y\n";
##
##
Global symbol "$y" requires explicit package name (did you forget to declare "my $y"?) at script.pl line 4.