in reply to -w $path Cross Platform Issues
If it's being odd, then just make your own, Here's what I'm thinking of:
sub WriteableDir { my $DIR = shift; if (open(F,">$DIR/tmp.file") ) { close(F); unlink("$DIR/tmp.file"); return 1; }else{ return 0; } }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: -w $path Cross Platform Issues
by ww (Archbishop) on Jul 24, 2010 at 18:56 UTC |