#! /usr/bin/perl

use strict;
use CGI;
use warnings;

my $cgi = CGI->new();

print ref $cgi;