Help for this page

Select Code to Download

Select or download this

if( not -w $dir) {
    die "directory $dir not writeable.\n";
}