#!/usr/local/bin/perl

use CGI;                             

$co = new CGI;                        

print $co->header,                    

$co->start_html(-title=>'CGI Example'),

$co->center($co->h1('Welcome to CGI!')),

$co->start_form(),

$co->textarea
(
    -name=>'textarea', 
    -rows=>10, 
    -columns=>60
), 

$co->end_form(),

$co->end_html;