trango/Net-Telnet-Trango/t/54-network-ap-su.t - diff

Return to 54-network-ap-su.t CVS log

Up to [local] / trango / Net-Telnet-Trango / t

version 1.1, 2007/02/06 18:55:21

version 1.2, 2007/02/06 19:10:48

Line 1

#!perl -T

# $RedRiver: 50-network.t,v 1.5 2007/02/06 00:42:09 andrew Exp $

# $RedRiver: 54-network-ap-su.t,v 1.1 2007/02/06 18:55:21 andrew Exp $

use Test::More tests => 37;

use File::Spec;

Line 44

my $t;

ok($t = Net::Telnet::Trango->new(), "Instantiating object");

$t->input_log($type . '_input.log'); # XXX Debugging

ok($t->open($host), "Opening connection to $host");