#!/usr/bin/perl # # $Copyright$ # # $Id: BEGIN.seq,v 1.1.1.1 2000/09/28 00:14:56 sekiya Exp $ ######################################################################## BEGIN { $V6evalTool::TestVersion = '$Name: $ '; } use V6evalTool; vLog("Remote boot NUT. "); #$ret=vRemote("reboot.rmt","","timeout=300"); $ret=vRemote("reboot.rmt",""); vLog("reboot.rmt returned status $rret") if $debug > 0; if ($ret > 0) { vLog("vRemote reboot.rmt exit $ret"); exit $V6evalTool::exitFatal; } vSleep(10); vLog(OK); exit $V6evalTool::exitIgnore; #end ######################################################################## __END__ =head1 NAME BEGIN.seq - Initialization for pmtu tests =head1 SYNOPSIS BEGIN.seq =head1 DESCRIPTION Initialize sequence before Beginning the series of pmtu tests. This sequence doesn't test any specification about IPv6. =cut