Perlコーディング初心者質問スレ Part 53

ＷＩＮＤＯＷＳの鯖でファイルが書き込み可能かどうかを判断するにはどうしたらいいんですか？
ＷＩＮＤＯＷＳ鯖の場合だと
if (-w $write_file_path) { print "書き込み可能\n"; }というプログラムがが使えないんです