version 155 B

12345678
  1. #!/usr/bin/perl
  2. use CGI qw/:standard/;
  3. $q = new CGI;
  4. print $q->header()
  5. . $q->start_html()
  6. . $q->p("CGI Version: ", $q->version())
  7. . $q->end_html();