package MyCMS;

use strict;
use warnings;
use CGI;

sub new {
    my ($class) = @_;
    
    my $self = bless {}, $class;
    $self->{cgi} = CGI->new;
    return $self;
}

sub param {
    my ($self,@param) = @_;

    return $self->{cgi}->param( @param );
}

1;