#!/usr/bin/perl
use CGI qw(:standard);

print header;
print start_html("My Super Counter");
print h1("My Super Counter");
print <<HTML;
<form action="third.cgi" method="post">
<input type="submit" name="bob" value="hello" />
</form>
HTML

open(IN, "<counter.txt");
chomp($count=<IN>);
close IN;
$count++;
print p("$count many people have visited this
site!"); 
open(OUT, ">counter.txt");
print OUT $count."\n";
close OUT;
$bob = param("bob");
print p("bob has value $bob");
print end_html;