my %modules = %{ $Module::CoreList::version{ 5.008 } };

if( grep /cgi/i, keys %modules ) {
    print "Found one!\n";
}