免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1897 | 回复: 6

perl如何检测文件已经传输完毕? [复制链接]

论坛徽章:
0
发表于 2012-05-15 11:41 |显示全部楼层
本帖最后由 首天 于 2012-05-15 11:53 编辑

如何用perl监控samba服务器中的一个文件夹,当文件夹内有新的文件,并且文件已经传输完毕后执行一些操作,譬如转移之类的。
现在使用是循环读取文件夹的列表,然后检测文件的时间是否小于当前的时间,小于则判断为文件传输完毕,实际使用中大部分都没有问题,个别文件出现文件传输不完整的情况
想请教,perl如何判断一个文件已经传输完毕?

论坛徽章:
0
发表于 2012-05-15 11:56 |显示全部楼层
首天 发表于 2012-05-15 11:41
如何用perl监控samba服务器中的一个文件夹,当文件夹内有新的文件,并且文件已经传输完毕后执行一些操作,譬 ...


这种情况,你还是用rsync吧,perl有客户端模块。
技术而言,复杂的事情简单化最美。

论坛徽章:
0
发表于 2012-05-15 13:35 |显示全部楼层
兰花仙子 发表于 2012-05-15 11:56
这种情况,你还是用rsync吧,perl有客户端模块。
技术而言,复杂的事情简单化最美。


谢谢仙子
rsync可以实现文件备份,和我们现在的需求有点差异。
我们的这个程序要实现的是samba共享文件管理,程序监测指定文件夹,当有新的文件时,执行一系列的,检测,复制,备份,删除等操作。

论坛徽章:
130
技术图书徽章
日期:2013-10-01 15:32:13戌狗
日期:2013-10-25 13:31:35金牛座
日期:2013-11-04 16:22:07子鼠
日期:2013-11-18 18:48:57白羊座
日期:2013-11-29 10:09:11狮子座
日期:2013-12-12 09:57:42白羊座
日期:2013-12-24 16:24:46辰龙
日期:2014-01-08 15:26:12技术图书徽章
日期:2014-01-17 13:24:40巳蛇
日期:2014-02-18 14:32:59未羊
日期:2014-02-20 14:12:13白羊座
日期:2014-02-26 12:06:59
发表于 2012-05-15 14:41 |显示全部楼层
回复 3# 首天

how about md5 check
   

论坛徽章:
0
发表于 2012-05-15 15:11 |显示全部楼层
用bash脚本吧,lsof一下就可以了。

论坛徽章:
0
发表于 2012-05-15 15:16 |显示全部楼层
回复 4# jason680
谢谢
为了更好的兼容性,管理程序运行在samba共享服务器上,windows客户端通过网络共享的方式上传、使用文件
md5数据如果在网络共享上传之前获取,就需要客户端额外的提供计算md5的步骤,由于涉及的客户端太多--大约几百台--实施起来不容易
如果在服务器端能够实现是最方便

   

论坛徽章:
0
发表于 2012-05-15 15:30 |显示全部楼层
dgww 发表于 2012-05-15 15:11
用bash脚本吧,lsof一下就可以了。

谢谢!
lsof确实可以判断出来,刚测试了一下,lsof -a -c smbd ./file
smb在访问的时候,会返回相应的进程信息
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

DTCC2020中国数据库技术大会 限时8.5折

【架构革新 高效可控】2020年8月17日~19日第十一届中国数据库技术大会将在北京隆重召开。

大会设置2大主会场,20+技术专场,将邀请超百位行业专家,重点围绕数据架构、AI与大数据、传统企业数据库实践和国产开源数据库等内容展开分享和探讨,为广大数据领域从业人士提供一场年度盛会和交流平台。

http://dtcc.it168.com


大会官网>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@it168.com
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP