trango/Net-Telnet-Trango/t/51-network-add_su-ap.t - diff

Return to 51-network-add_su-ap.t CVS log

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

version 1.2, 2007/02/06 16:23:17

version 1.3, 2007/02/06 16:29:58

Line 1

#!perl -T

# $RedRiver: 51-network-add_su.t,v 1.1 2007/02/06 00:42:33 andrew Exp $

# $RedRiver: 51-network-add_su.t,v 1.2 2007/02/06 16:23:17 andrew Exp $

use Test::More tests => 17;

use File::Spec;

Line 57

my $t;

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

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

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