#!/usr/local/bin/perl 
$machine=$ARGV[0];
%runt=(
	"local" , "yes",
	"tape" , "/dev/nrmt0h",
	"dev1" , "/dev/rz0a", 
	"dev2" , "/dev/rz0g",
	"dev3" , "/dev/vol/rootdg/us_striped",
	"dump", "/usr/sbin/dump 5bdsuf 64 61000 6100");

$status=system("rsh $machine mt -f $$machine{tape} online");