use warnings; without warnings: $name = "foo"; print $nam; # empty output with warnings: use warnings; $name = "foo"; print $nam; # Name "main::name" used only once: possible typo at warnings.pl line 2. # Name "main::nam" used only once: possible typo at warnings.pl line 3. # Use of uninitialized value in print at warnings.pl line 3.