#!/usr/bin/perl
#
# $Copyright$
#
# $Id: BEGIN.seq,v 1.1.1.1 2000/10/31 22:39:23 sekiya Exp $

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

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

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

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

=head1 NAME

BEGIN.seq - Initialization for stateless-addrconf tests

=head1 SYNOPSIS

BEGIN.seq

=head1 DESCRIPTION

 Initialize sequence before beggining the series of
 stateless-addrconf tests.
 This sequence doesn't test any specification about IPv6.

=cut