@@-
chomp($hostname= `uname -n`); $? and die 'uname $?';
($hostname)=(gethostbyname $hostname) or die "hostname $hostname ?";

chomp($s= `uname`); $? and die 'platform $?';
if ($s =~ m/^Linux$/) {
    chomp($_= `uname -m`); $? and die 'platform $?';
    if (m/^i\d86/) {
	$platform= 'linux-i386';
    } else {
	die '$_ ?';
    }
}

$ncipher= $hostname =~ m/\.ncipher\.com$/ 
    || $hostname =~ m/\.ncipherusa\.com$/;