use strict; 
use CGI; 

blah, blah, blah 

sub cgi { 
 my $cgi = new CGI; 
 blah, blah 
}