m/^\d+\.\d+/ or die "$_ ?";
$platform= "SunOS$&";
$xbindir= '/usr/openwin/bin';
+} elsif ($uname =~ m/^HP\-UX/) {
+ chomp($_= `uname -r`); $? and die "platform $?";
+ m/^B\.(\d+\.\d+)$/ or die "$_ ?";
+ $platform= "HP-UX$1";
} else {
die "$uname ?";
}
@@? -d '/opt/bin' ?@@@@#
PATH=$PATH:/opt/bin
@@;@@#
+@@? $uname eq 'HP-UX' ?@@@@#
+PATH=$PATH:/usr/contrib/bin
+@@;@@#
PATH=$PATH:/usr/local/bin:/bin:/usr/bin:/usr/local/sbin:/sbin:/usr/sbin
@@? $uname eq 'SunOS' ?@@@@#
PATH=$PATH:/usr/ccs/bin
xload -geometry 120x120+@@
@hostlist= ($ncipher eq 'bos' ? qw(viking dover pell arrakis) :
- $ncipher eq 'cam' ? qw(jura islay dover dounreay) :
+ $ncipher eq 'cam' ? qw(jura islay dover dounreay marple) :
qw(davenant anarres));
for ($i=0; $i<@hostlist; $i++) { last if $hostlist[$i] eq $nodename; }
if ($i>=@hostlist) {