#!/usr/bin/perl
$mount = `df -k`;
if($mount !~ /10.1.1.1:\/BiO/) {
system("mkdir /BiO;mount -t nfs 10.1.1.1:/BiO /BiO";chmod 777 /BiO); }