kabel@linux:~> perl
if (0) { require CGI; }

print STDOUT CGI::header ();
Undefined subroutine &CGI::header called at - line 3.
kabel@linux:~>