RCP files

[ngraham]

Quick program to rcp files to other hosts. Makes backup of old file first then copies across.

#!/bin/perl

$bbproctab="bb-proctab";
$bbproctab_bkp="bb-proctab.bkp";
$dir="/export/home/bbuser/bb/etc";
$rcp="/bin/rcp";
$rsh="/bin/rsh";

@hosts = (host1,host2,host3);
foreach $host(@hosts)
{
 `$rsh $host mv $dir/$bbproctab $dir/$bbproctab_bkp`;
 `$rcp $bbproctab $host:$dir`;
 print "$rcp $bbproctab $host:$dir\n";
}