Select Code to Download

#!/usr/bin/perl
use strict;
...
exit;

__END__

U:\>uninit01.pl
perl version: 5.018002
Use of uninitialized value $x in print at U:\uninit01.pl line 10.
Use of uninitialized value in print at U:\uninit01.pl line 10.
Use of uninitialized value $x in printf at U:\uninit01.pl line 11.

#!/usr/bin/perl
use strict;
...
exit;

__END__

U:\>uninit02.pl
perl version: 5.018002
...
Use of uninitialized value in print at U:\uninit02.pl line 12.
No error found.
Use of uninitialized value $x in printf at U:\uninit02.pl line 29.