#!/usr/bin/perl -Tw

use CGI; # or 
use My_Own;

if ( $id eq 'Anonymous Monk' ) {
	$msg = 'Better Seek Perl Wisdom First';
}
else {
	open (THE, "documentation") unless ( $level > 6 );
}