#!/usr/bin/perl

use CGI;
die "CGI not loaded" unless (keys(%CGI::) > 1);
use cGi;
die "cGi not loaded" unless (keys(%cGi::) > 1);