use CGI;
$cgi=CGI->new;
if (exists &CGI::new)
{
print "Exists\n";
}
Or
if ( defined( &CGI::new ) )
{
print "Defined\n";
}
Or
if ( CGI->can('new') )
{
print "Exists\n";
}
Or
if ( $cgi->can('new') )
{
print "Defined\n";
}
$cgi=CGI->new;
if (exists &CGI::new)
{
print "Exists\n";
}
Or
if ( defined( &CGI::new ) )
{
print "Defined\n";
}
Or
if ( CGI->can('new') )
{
print "Exists\n";
}
Or
if ( $cgi->can('new') )
{
print "Defined\n";
}
No comments :
Post a Comment