用Perl写asp怎么进行文件操作的？

多谢 hangring 的关注.
多谢 hangring 的关注，还请大家多多帮忙，我是 Perl 的初学者， 很多地方不懂的，遇到问题没能解决，心头老堵的慌.

:) 这个问题用绝对路径 .
:) 这个问题用绝对路径 就可以解决问题了

我似乎是使用过觉得路径的.
我似乎是使用过觉得路径的，好像没有成功， hangring 是在 PerlScript 环境中测试的吗？
是怎样通过程序得到 我 asp 文件当前虚拟目录的绝对路径的呢？

用 --#!/usr/bin/perl .
用
#!/usr/bin/perl -w

open FH, ">test.txt";

if (FH){
print "success !";
}
这样的Perl程序可以使用绝对路径任意的指定文件产生的位置，但在asp里面，应该必须把文件产生在asp程序的虚拟目录内吧？
可不可以使用：

my $path = system("cd");

这样的方式来得到绝对路径？这个好像需要有 shell的权限才能使用吧？在在Perl程序里用过，可以得到路径，在asp里就不知道了，现在不在家，也没办法尝试。

突然想起ASP有个取绝对路径的方法 $Server->MapPath();

<%@LANGUAGE="PerlScript" CodePage="65001"%>
<%
my $test = $Server->MapPath('test.txt');
open FH, '>', $test;
if (FH){
print FH '';
$Response->write("success !");
}
close FH;
%>

---
对于之前的方式, 事实上test.txt被生成在c:/window/system32/里了, 正是command.exe的所在目录
<%
open FH, '>test.txt';
if (FH){
print FH '';
$Response->write("success !");
}
close FH;
%>

   

太感谢了，晚上回去后在进.
太感谢了，晚上回去后在进行测试。
不过通过Perl可以在虚拟目录以外，甚至是系统目录内产生文件，这个是不是会产生安全隐患呢？

   

昨天回去实验了一下，问题.
昨天回去实验了一下，问题解决的，的确是路径问题，谢谢 hangring 的热心指导 ！！！[CCB]1[/CCB]