>> 欢迎您，客人： 登录 按这里注册 忘记密码 在线 搜索 论坛风格  帮助  插件   


>>> 什么是CGI，CGI是怎么编写的，Perl又是什么，请在这里交流
雷傲极酷超级论坛 → 『 CGI 编程讨论区 』 [返回] → 浏览：[求助] 怎样编写删除服务器上的　...　标记论坛所有内容为已读 

 目前论坛总在线 574 人，本主题共有 1 人浏览。其中注册用户 0 人，访客 1 人。　 [关闭详细列表]
发表一个新主题 回复贴子 开启一个新投票 ◆此帖被阅读 2334 次◆　 浏览上一篇主题 　刷新本主题  树形显示贴子　浏览下一篇主题
 * 贴子主题： [求助] 怎样编写删除服务器上的某个文件的perl代码? 不分页显示此帖  保存该页为文件  本贴有问题，发送短消息报告给版主  加入个人收藏&关注本贴  显示可打印的版本  把本贴加入收藏夹   

 fayehoo 




等级: 侠客
信息: 该用户目前不在线
威望: 0　积分: 14
现金: 2418 雷傲元
存款: 没开户
贷款: 没贷款
来自: 保密　blank
发帖: 10 篇
精华: 0 篇
资料: 　
在线: 11 时 12 分 14 秒
注册: 2003/03/25 11:22pm
造访: 2007/10/14 05:18am
 消息　查看　搜索　好友　引用　回复贴子回复　只看我　[楼 主]
  我的ftp出现了问题,明明已经删除了某个文件,但是却还能在列表里看到此文件且占用了空间.再删或着其他操作都出错.无奈,只有想能否写个perl文件来删除.我自己写的文件是这样的,文件名x.cgi,要删除的文件名"s.wmv",两个文件在同一目录下,代码就一行:y\N
unlink ("s.wmv);9y
运行后,出现uB RQ
CGI Errorgu
The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:@q+
运行不成功.各位高手帮帮忙,应该怎么写这个文件啊?)f}e.








发贴时间2005/12/29 01:14pm　IP: 已设置保密[本文共494字节]　 
 冷月玫瑰 
 头衔: 玫瑰飘香

 

等级: 法师
信息: 该用户目前不在线 美女 巨蟹座
威望: +2　积分: 7898
现金: 427107 雷傲元
存款: 39095 雷傲元
贷款: 没贷款
来自: 玫瑰花开之地　blank
发帖: 7846 篇
精华: 0 篇
资料: 　
在线: 285 时 06 分 01 秒
注册: 2005/06/11 10:23pm
造访: 2008/11/15 01:19pm
 消息　查看　搜索　好友　引用　回复贴子回复　只看我　[第 2 楼]
  不会吧。。。就一行？当然不行了。。。SpmCZ
懒得搞复杂了，随手弄了个最简单的。。：）把下面的代码保存为del.cgi，上传后运行。[,3

代码：
*
#根据你的情况设置perl路径W#=4}6
#!/usr/bin/perl#boe/
©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂　　J.yg"
print "Content-Type:text/html\n\n";]
print "<html><head><title></title></head>\n";,!Gp
$filepath = "C:/wwwroot/bbs/"; #此处为你要删除的文件所在目录的绝对路径。\L}r]
if (-e("${filepath}abc.wmv")){VrT
unlink ("${filepath}abc.wmv");/`tO7
print "<body>已删除！</body>\n"
}©雷傲极酷超级论坛 -- 雷傲极酷超级论坛，最新软件，BT 下载，游戏娱乐，交友聊天，您网上的自由天堂　　j\&P(V
else { print "<body>没有此文件！</body>\n";}QQ:D;
print "</html>\n";

d$g








速度慢，本ID万年难得登录一次。。汗~~~



发贴时间2005/12/29 04:13pm　IP: 已设置保密[本文共737字节]　 
 fayehoo 




等级: 侠客
信息: 该用户目前不在线
威望: 0　积分: 14
现金: 2418 雷傲元
存款: 没开户
贷款: 没贷款
来自: 保密　blank
发帖: 10 篇
精华: 0 篇
资料: 　
在线: 11 时 12 分 14 秒
注册: 2003/03/25 11:22pm
造访: 2007/10/14 05:18am
 消息　查看　搜索　好友　引用　回复贴子回复　只看我　[第 3 楼]
  非常感谢。我刚开始学cgi，弱弱地问一下，＃号不是注释吗？在注释里可以设置perl路径？_4o,








发贴时间2005/12/30 07:16pm　IP: 已设置保密[本文共105字节]　 
 亚子 
 头衔: 东邪
 勋章: 终生成就奖,谢谢您为社区发展做出的不可磨灭的贡献! 创作大师奖,您的文章总会让人赏心悦目,继续努力哦! 创意大师奖,您的创意总是那么天马行空,再来点灵感? 论坛卫士奖,你为了论坛的安宁与和平作出了卓越的贡献 社区建设奖,谢谢您为社区发展做出的重大贡献!

 

等级: 终极天王 [荣誉]
信息: 该用户目前不在线 此人为总版主 帅哥 申猴 水瓶座
威望: +5　积分: 12040
现金: 21716 雷傲元
存款: 9664 雷傲元
贷款: 没贷款
来自: 湖南长沙　China
发帖: 10932 篇
精华: 1 篇
博彩: 0 胜 0 平 1 负
资料: 　发送即时消息给亚子 　
在线: 711 时 28 分 11 秒
注册: 2003/07/23 04:39am
造访: 2008/10/10 07:28pm
 消息　查看　搜索　好友　引用　回复贴子回复　只看我　[第 4 楼]
  这个是基本的cgi设置……Z`,








欧美非拉我入伙
史集经过俺加工


发贴时间2005/12/30 07:48pm　IP: 已设置保密[本文共47字节]　 

 该主题只有一页

快速回复主题: [求助] 怎样编写删除服务器上的某个文件的perl代码?
您目前的身份是： 客人 ，要使用其他用户身份，请输入用户名和密码。未注册客人请输入网名，密码留空。
输入用户名和密码: 用户名: 没有注册？　密码: 忘记密码？
上传附件或图片 (最大容量 2048KB)
发帖数要大于 15 篇(认证用户不限)
目前附件:(如不需要某个附件，只需删除内容中的相应 [UploadFile ...] 标签即可) [删除]
选项　 插入魔法表情

使用 LeoBBS 标签？
显示您的签名？
使用表情字符转换？
使用字体转换？
　　　　快速引用第 楼层的回复
 顶端　加到"个人收藏夹" 主题管理： 总固顶 取消总固顶 区固顶 取消区固顶 固顶 取消固顶 提升 沉底
加重 取消加重 精华 取消精华 锁定 解锁 删除 删除回复 移动

© 版权所有： 雷傲极酷超级论坛　 　皖ICP备06000657号
程序版权所有：山鹰(糊)、花无缺　 版本：LeoBBS X Build060830		 

本论坛言论纯属发表者个人意见，与 雷傲极酷超级论坛 立场无关