#!/usr/local/bin/perl $perl_ver_color = ($] > 4) ? 'ltgreen' : 'red'; if(eval 'require URI;') { $uri_color = 'ltgreen'; } else { $uri_color = 'red'; $has_URI = 'not'; } if(eval 'require Socket;') { $socket_color = 'ltgreen'; } else { $socket_color = 'red'; $has_socket = 'not'; } print <

Server Verification Script

CGI Execution:successful
Perl Version:$]
URI module:$has_URI installed
Socket.pm:$has_socket installed
HTML