#!/usr/bin/perl
#
# $Copyright$
#
# $TAHI: ct/icmp/BEGIN.seq,v 1.6 2001/10/05 06:38:50 masaxmasa Exp $

########################################################################
BEGIN { $V6evalTool::TestVersion = '$Name:  $ '; }
use V6evalTool;

vLog("Remote boot NUT. ");
$ret=vRemote("reboot.rmt","");
vLog("reboot.rmt returned status $ret") if $debug > 0;
if ($ret > 0) {
    vLog("vRemote reboot.rmt exit $ret");
    exit $V6evalTool::exitFatal;
}

vLog(OK);
exit $V6evalTool::exitIgnore;

#end
########################################################################
__END__

=head1 NAME

BEGIN.seq - Initialization for ICMP tests

=head1 TARGET

Host and Router

=head1 SYNOPSIS

BEGIN.seq -pkt /dev/null

=head1 DESCRIPTION

 Initialize sequence before beginning the series of ICMP tests.
 This sequence doesn't test any specification about IPv6.

 Reboot TN.

=cut