Skip to content

Commit

Permalink
Refresh CGI.pm to 2.36
Browse files Browse the repository at this point in the history
  • Loading branch information
Lincoln Stein authored and Chip Salzenberg committed May 15, 1997
1 parent 5dd86c5 commit 7d37aa8
Show file tree
Hide file tree
Showing 3 changed files with 251 additions and 57 deletions.
2 changes: 1 addition & 1 deletion eg/cgi/frameset.cgi
Expand Up @@ -47,7 +47,7 @@ sub print_html_header {
}

sub print_end {
print qq{<P><hr><A HREF="cgi_docs.html">Go to the documentation</A>};
print qq{<P><hr><A HREF="../index.html" TARGET="_top">More Examples</A>};
print $query->end_html;
}

Expand Down
6 changes: 3 additions & 3 deletions eg/cgi/javascript.cgi
@@ -1,6 +1,6 @@
#!/usr/local/bin/perl

# This script illustrates how to use JavaScript to validage fill-out
# This script illustrates how to use JavaScript to validate fill-out
# forms.
use CGI qw(:standard);

Expand Down Expand Up @@ -68,7 +68,7 @@ print header;
print start_html(-title=>'Personal Profile',-script=>$JSCRIPT);

print h1("Big Brother Wants to Know All About You"),
strong("Note: "),"This page uses JavaScript and requires",
strong("Note: "),"This page uses JavaScript and requires ",
"Netscape 2.0 or higher to do anything special.";

&print_prompt();
Expand Down Expand Up @@ -97,7 +97,7 @@ sub print_prompt {
sub print_response {
import_names('Q');
print h2("Your profile"),
"You are a ",b($Q::age)," year old ",b($Q::color,$Q::gender),".",
"You claim to be a ",b($Q::age)," year old ",b($Q::color,$Q::gender),".",
"You should be ashamed of yourself for lying so ",
"blatantly to big brother!",
hr;
Expand Down

0 comments on commit 7d37aa8

Please sign in to comment.