package MyCGI;
use base qw(CGI);
use POSIX qw(access);
MyCGI-> new();