Encourage best practice, even though it's a trivial example.

git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@1335890 13f79535-47bb-0310-9956-ffa450edef68

diff --git a/docs/manual/howto/cgi.xml b/docs/manual/howto/cgi.xml
index fcd70e6c5dd174fb3f3b569d74e14f21ed775e99..bf6f4dc6c842fdf70cf5fc8ae375a6cea0e95593 100644 (file)
--- a/docs/manual/howto/cgi.xml
+++ b/docs/manual/howto/cgi.xml
@@ -485,8 +485,11 @@ print "Hello, World.";
 
       <highlight language="perl">
 #!/usr/bin/perl
+use strict;
+use warnings;
+
 print "Content-type: text/html\n\n";
-foreach $key (keys %ENV) {
+foreach my $key (keys %ENV) {
     print "$key --&gt; $ENV{$key}&lt;br&gt;";
 }
       </highlight>