topic check if file system is mounted - perl in Operating System - Linux

check if file system is mounted - perl

itai weisman — Thu, 27 Mar 2008 11:00:14 GMT

hello,
does anyone know how can I check wheter a file system is mounted, on a perl script ? without involving any operating system commands - I need to write something which is operating system independed (including windows)
thanks
Itai

Re: check if file system is mounted - perl

James R. Ferguson — Thu, 27 Mar 2008 11:20:58 GMT

Hi:

At least in UNIX, a mountpoint will always have its inode equal to two (2):

# perl -le '$dir=shift or die;die "not a dir\n" unless -d $dir;printf "%s a mountpoint\n",(stat _)[1]==2 ? "is":"not"' /path

Regards!

...JRF...