Bad luck for me once again...:-(
Check this...
eurika120:arijit>./test3.pl test3.plBlocksize: []eurika120:arijit>eurika120:arijit>eurika120:arijit>cat test3.pl#!/depot/qsc/VG1.0/bin/perluse File::stat;
my $file = "$ARGV[0]";my $st = "";my $blocksize = 0;
$st = stat($file);$blocksize = $st->blksiz
Try using the File::stat module...it works fine for me
on RHES and 7.2
use File::stat;
my $file = "./blah";
my $st = "";
my $blocksize = 0;
$st = stat($file);
$blocksize = $st->blksize;
print "Blocksize: [$blocksize]\n";
HTH
JD
--- Arijit Das <[EMAIL PROTECTED]> wrote:
> Thanks Bruce...Your
