免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1815 | 回复: 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在访问的时候,会返回相应的进程信息
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

SACC2019中国系统架构师大会

【数字转型 架构演进】SACC2019中国系统架构师大会,8.5折限时优惠重磅来袭!
2019年10月31日~11月2日第11届中国系统架构师大会(SACC2019)将在北京隆重召开。四大主线并行的演讲模式,1个主会场、20个技术专场、超千人参与的会议规模,100+来自互联网、金融、制造业、电商等领域的嘉宾阵容,将为广大参会者提供一场最具价值的技术交流盛会。

限时8.5折扣期:2019年9月30日前


----------------------------------------

大会官网>>
  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP