# Standard header stuff
use CGI qw( :standard );
print( header() );
print( start_html() );

# Get inputs
$userName    = param("name");
$userAge     = param("age");

# Print welcome message
if ($userName == "Bob") {
  print h1("Bob who??");
}
else 
  print h1("Welcome, $userName.  Good thing you aren't Bob.");


# Print farewell stuff
$x = 27;
prnt h2("Thanks for visiting. By the way, $x plus your age is " . ($x + $userAge) );

# Print XHTML footer
print ( end_html() );