#!/bin/sh -
hostname="`hostname | sed -e 's/\..*//'`"
xlsclients | egrep \
 '[^ ]* xload -geometry [^ ]* -title '"'xload - $hostname'" \
 >/dev/null && exit 0
xload -geometry 120x120+@@

@hostlist=
($ncipher eq 'bos' ? qw(viking dover pell arrakis) :
 $ncipher eq 'cam' ? qw(jura islay dover dounreay marple belgrano greenock) :
 $chiark ? qw(chiark) :
 qw(davenant anarres liberator norway));

for ($i=0; $i<@hostlist; $i++) { last if $hostlist[$i] eq $nodename; }
if ($i>=@hostlist) {
    print STDERR "!! nodename $nodename not in $ncipher list @hostlist\n";
    $i=-2;
}

302+141*$i;

@@+0 -title "xload - $hostname"