使用unix ksh shell脚本或perl脚本监控新文件夹并触发perl脚本

Question

我一直在谷歌搜索和溢出了一下，找不到任何可用的东西。

我需要一个脚本来监视公用文件夹并触发新文件的创建，然后将这些文件移动到一个私有位置。

我有一个桑巴共享文件夹/exam/ple/在UNIX上映射到X:\在Windows上。在某些操作中，txt文件被写入共享。我想绑架出现在该文件夹中的任何txt文件，并将其放入unix上的私人文件夹/pri/vate。在移动该文件后，我想触发一个单独的perl脚本。

编辑 仍观望shell脚本，如果任何人有任何想法...的东西，将监测的新文件，然后运行是这样的：

#!/bin/ksh 
mv -f /exam/ple/*.txt /pri/vate 

Answer 1

检查incron。它似乎正是你所需要的。

Answer 2

如果我理解正确，你只是想要这样的事情？

#!/usr/bin/perl 

use strict; 
use warnings; 

use File::Copy 

my $poll_cycle = 5; 
my $dest_dir = "/pri/vate"; 

while (1) { 
    sleep $poll_cycle; 

    my $dirname = '/exam/ple'; 

    opendir my $dh, $dirname 
     or die "Can't open directory '$dirname' for reading: $!"; 

    my @files = readdir $dh; 
    closedir $dh; 

    if (grep(!/^[.][.]?$/, @files) > 0) { 
     print "Dir is not empty\n"; 

     foreach my $target (@files) { 
      # Move file 
      move("$dirname/$target", "$dest_dir/$target"); 

      # Trigger external Perl script 
      system('./my_script.pl'); 
    } 
} 

Answer 3

File :: ChangeNotify允许您监视文件和目录的更改。

https://metacpan.org/pod/File::ChangeNotify

Answer 4

这将导致IO公平一点 - STAT（）调用等。如果您想在不运行时开销（但更多的前期工作）迅速通知，看一看FAM/dnotify：link text或link text

Answer 5

#!/bin/ksh 
while true 
do 
    for file in `ls /exam/ple/*.txt` 
    do 
      # mv -f /exam/ple/*.txt /pri/vate 
      # changed to 
      mv -f $file /pri/vate 

    done 
    sleep 30 
done 

Answer 6

$ python autocmd.py /exam/ple .txt,.html /pri/vate some_script.pl 

优点：

• 更容易比incron安装由于pyinotify是纯Python
• 事件驱动 - 影响小于the perl script

autocmd.py：

#!/usr/bin/env python 
"""autocmd.py 

Adopted from autocompile.py [1] example. 

[1] http://git.dbzteam.org/pyinotify/tree/examples/autocompile.py 

Dependencies: 

Linux, Python, pyinotify 
""" 
import os, shutil, subprocess, sys 

import pyinotify 
from pyinotify import log 

class Handler(pyinotify.ProcessEvent): 
    def my_init(self, **kwargs): 
     self.__dict__.update(kwargs) 

    def process_IN_CLOSE_WRITE(self, event): 
     # file was closed, ready to move it 
     if event.dir or os.path.splitext(event.name)[1] not in self.extensions: 
      # directory or file with uninteresting extension 
      return # do nothing 

     try: 
      log.debug('==> moving %s' % event.name) 
      shutil.move(event.pathname, os.path.join(self.destdir, event.name)) 
      cmd = self.cmd + [event.name] 
      log.debug("==> calling %s in %s" % (cmd, self.destdir)) 
      subprocess.call(cmd, cwd=self.destdir) 
     except (IOError, OSError, shutil.Error), e: 
      log.error(e) 

    def process_default(self, event): 
     pass 


def mainloop(path, handler): 
    wm = pyinotify.WatchManager() 
    notifier = pyinotify.Notifier(wm, default_proc_fun=handler) 
    wm.add_watch(path, pyinotify.ALL_EVENTS, rec=True, auto_add=True) 
    log.debug('==> Start monitoring %s (type c^c to exit)' % path) 
    notifier.loop() 


if __name__ == '__main__': 
    if len(sys.argv) < 5: 
     print >> sys.stderr, "USAGE: %s dir ext[,ext].. destdir cmd [args].." % (
      os.path.basename(sys.argv[0]),) 
     sys.exit(2) 

    path = sys.argv[1] # dir to monitor 
    extensions = set(sys.argv[2].split(',')) 
    destdir = sys.argv[3] 
    cmd = sys.argv[4:] 

    log.setLevel(10) # verbose 

    # Blocks monitoring 
    mainloop(path, Handler(path=path, destdir=destdir, cmd=cmd, 
          extensions=extensions)) 

Answer 7

我不使用ksh的，但这里是我如何与SH做到这一点。我确定它很容易适应ksh。

#!/bin/sh 
trap 'rm .newer' 0 
touch .newer 
while true; do 
    (($(find /exam/ple -maxdepth 1 -newer .newer -type f -name '*.txt' -print \ 
     -exec mv {} /pri/vate \; | wc -l))) && found-some.pl & 
    touch .newer 
    sleep 10 
done 

Answer 8

我迟到了，我知道，但为了完整性和为未来的游客提供信息;

#!/bin/ksh 
# Check a File path for any new files 
# And execute another script if any are found 

POLLPATH="/path/to/files" 
FILENAME="*.txt" # Or can be a proper filename without wildcards 
ACTION="executeScript.sh argument1 argument2" 
LOCKFILE=`basename $0`.lock 

# Make sure we're not running multiple instances of this script 
if [ -e /tmp/$LOCKFILE ] ; then 
    exit 0 
else 
    touch /tmp/$LOCKFILE 
fi 

# check the dir for the presence of our file 
# if it's there, do something, if not exit 

if [ -e $POLLPATH/$FILENAME ] ; then 
    exec $ACTION 
else 
    rm /tmp/$LOCKFILE 
    exit 0 
fi 

从cron运行它;

*/1 7-22/1 * * * /path/to/poll-script.sh >/dev/null 2>&1

你想使用锁文件在随后的脚本（$ ACTION），然后清理退出，只是让你没有任何堆放过程。