关于perl上传的友情提醒【附上测试代码】

helbreathszw

不是吧，livejournal,mixi都是用的mod_perl，他们的图片上传也没见出什么问题啊
关键还是和perl功力有关！！

aaronvox

土人

rhinux

即将这么做,俺无视php

gudai

原帖由 helbreathszw 于 2007-6-5 16:44 发表
不是吧，livejournal,mixi都是用的mod_perl，他们的图片上传也没见出什么问题啊
关键还是和perl功力有关！！

呵呵，和perl功力肯定是有关系的。我用的是CGI模组里的upload
唉，怎么都查不出来。
上传一个20M的文件，然后内存使用就增加了20M
过2分钟，不见内存有释放的迹象。

gudai

我已经在一楼贴上了测试代码，感兴趣的兄弟，不防一试。

我传了个100多M的文件，然后内存使用就加了100M。过了几分钟，没有丝毫释放的迹象。

tong0245

原帖由 gudai 于 2007-6-4 11:07 发表
perl的垃圾回收机制简直是不堪忍受，undef根本释放不了内存

选perl来上传真是我最近做的最大的错误决定了。

本指望mod_perl会有效提高处理的并发数量，没成想一会儿内存就到90%了。

还望有意采用perl上传 ...

上传的问题 和perl的对象回收机制毫无 关系
首先我不太懂perl, 也不太会php
我只是告诉这个和语言无关 ,顶多和使用的组件有关.
其实上传的时候 在磁盘写个缓冲就好了. 别全部写到内存里边.
这个时候 你需要看看你用的组件的资料是否支持 在磁盘上开缓存.
读一点 往磁盘上写一点.
不过这样没准会慢些.
不管什么语言,如果上传的时候都写到内存 ,得到的都是同样的结果.
你还没有想清楚这个 就发这样标题的帖子
你还搞什么测试 这个问题和perl 语言本身的垃圾收集机制毫无关系

[ 本帖最后由 tong0245 于 2007-6-13 17:00 编辑 ]

gudai

tong0245说的很有道理

问题是我在脚本中用了内存，脚本执行完了，perl应该会自动释放掉占用的内存。

现在我的问题在于，perl不会自动释放内存。既然perl不能自动释放内存，那么上传还怎么用？

我采用的是CGI模组的上传来实现进度hook， 就我查到的资料看，这是perl上传中首选的解决方案了。

gudai

原帖由 xiaoquqi 于 2007-6-5 10:05 发表

不会的吧 我们这一直用的挺好的呀

呵呵，兄弟，帮我测试下我贴的代码，如何。

我的环境是Linux的。

用free命令查看空闲内存。

对比发现，传个100M的，那么内存就多用了100M.

gudai

原帖由 ffangmm 于 2007-6-5 10:50 发表
我一直用这个，蛮好的啊！要不要帮忙啊？呵呵！

要。

福瑞哈哥

期待高手解答，搞不懂mod_perl。
不過可以肯定的是，在standalone Perl中，一個對象引用計數為0時，這個對象將立即銷毀。
如果這確定是CGI.pm或者mod_perl的問題，一個解決方案是把這個upload單獨設為cgi程序運行。