version 1.1, 2011/06/03 09:28:47 |
version 1.2, 2011/06/03 11:03:41 |
|
|
use hash; |
use hash; |
|
|
our $ZFILESERVER_IP = '192.168.12.2'; |
our $ZFILESERVER_IP = '192.168.12.2'; |
our @ZMPOINTS = ('zV6', 'zV7', 'zV8'); |
our @ZMPOINTS = ('rmt_maket'); |
our $mpoint; |
our $mpoint; |
|
|
# according to manual of Perl's function system(), |
# according to manual of Perl's function system(), |
|
|
# Check mount table for remote mounts |
# Check mount table for remote mounts |
foreach $mpoint (@ZMPOINTS) |
foreach $mpoint (@ZMPOINTS) |
{ |
{ |
if ( ! `/sbin/mount | /usr/bin/grep $mpoint`) |
if ( ! `/bin/mount | /usr/bin/grep $mpoint`) |
{ |
{ |
log::critical("$mpoint not mounted. I can't run without that one! EXITING"); |
log::critical("$mpoint not mounted. I can't run without that one! EXITING"); |
# NOTREACHED |
# NOTREACHED |