$ perl -e '
use strict;
use warnings;
my $x;
print $x;'
Use of uninitialized value in print at -e line 5.