Ouptut shows up in DOS window

[steve . jennings]

I have Sambar 5.0 web server, IE 5.5, and Active Perl build 629, running on a really 
slow HP vectra XM NT 4.0 SP 6.

When I run the following script:

#!c:\perl\bin\perl -wT
use CGI ':standard';
use BER;
require 'SNMP_Session.pm';
my $host = "192.168.0.1";
my $community = "public";
my $port = 161;
$session = SNMP_Session->open ($host, $community, $port) || die "couldn't open SNMP 
session to $host";
$oid1 = encode_oid (1, 3, 6, 1, 2, 1, 1, 3, 0);
mimic();
print "Content-type: text/html\n\n";
sub mimic {
if ($session->get_request_response ($oid1)) {
     ($bindings) = $session->decode_get_response($session->{pdu_buffer});
        while ($bindings ne '') {
        ($binding,$bindings) = &decode_sequence ($bindings);
        ($oid,$value) = &decode_by_template ($binding, "%O%@");
        print $pretty_oids{$oid}," => ",
        &pretty_print ($value), "\n";
        }
    }
}

the output (which is correct) shows up in a DOS window and then closes really fast. 
Any ideas? 

Thanks
Steve Jennings
[EMAIL PROTECTED]

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]