#!/usr/bin/perl
$version = 2 ;

# nfsAddMount - Mount a new NFS filesystem

# --- Initialization ---
foreach $i (0 .. $#ARGV) {
   $data .= "@ARGV[$i] " ;
}
chop($data) ;

if($data eq "-v") {
    print "$version\n" ;
    exit(0) ;
}
 
# Discover OS type and run the appropriate command
chop($os = `uname -s`) ;

if($os eq "Linux") {
    $OS="linux" ;
    `umount $data` ;

} elsif($os eq "SunOS") {
    chop($ver = `uname -r`) ;
    ($major, $minor) = split(/\./, $ver) ;
    if($major == 5) {
        $OS = "solaris" ;
	`umount $data` ;

    } else {
        $OS = "sunos" ;
	`umount $data` ;
    }

} elsif(($os eq "IRIX") | ($os eq "IRIX64"))  {
    $OS="irix" ;
    `umount $data` ;

} elsif($os eq "HP-UX") {
    $OS="hpux" ;
    `umount $data` ;
}

print "Unmounting $data\n" ;

exit 0 ;


