#! /usr/bin/perl -wT
use strict;
use CGI qw( :standard );
$|++;

print header, start_html( 'Test Page' ),
      
      p( "Here's a pretty picture; enjoy\n" ),
      
      img( { src=>'../images/back.gif', 
             align=>'CENTER' }, "" 
         ),

      p( "Cool, huh?  When ready, go", 
         a( { href=>'../index.html' }, 'Home' ) 
       ),
      end_html;