[2K WebStudio]

Ниже приведён весь скрипт Бредбери!
У меня вопрос, если этот cgi файл лежит в папке cgi-bin, как мне сохранить texdata.txt в папке, которая находится на уровень выше?
И ещё, как перезаписать этот файл, если он уже существует?
#!C:\usr\bin\perl

# © Willyam Bradberry 2001 ::: enjoy
# примечание - когда заливаете на сервак этот файл не забудьте поставить ASCII-mode

$file_name = "textdata.txt";
$mydata=$ENV{'QUERY_STRING'};

print "Content-type: text/html\n\n";
open (MYFILE,">$file_name");
print MYFILE "$mydata";
print "$mydata";
close (MYFILE);