diff options
| author | Jules Laplace <carbon@melanarchy.org> | 2013-08-02 17:16:34 -0500 |
|---|---|---|
| committer | Jules Laplace <carbon@melanarchy.org> | 2013-08-02 17:16:34 -0500 |
| commit | ff9fe30cf16474407580daddc990686cf868aa15 (patch) | |
| tree | bf274d7fa78a4c067585ea7751015f1a8b691e09 /bin/incoming/buckypoll.pl | |
| parent | c36b26f23c2ce37b509ad90c92c0ba7a840d575f (diff) | |
incoming/ scripts
Diffstat (limited to 'bin/incoming/buckypoll.pl')
| -rwxr-xr-x | bin/incoming/buckypoll.pl | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/bin/incoming/buckypoll.pl b/bin/incoming/buckypoll.pl new file mode 100755 index 0000000..4ed9d7a --- /dev/null +++ b/bin/incoming/buckypoll.pl @@ -0,0 +1,21 @@ +#!/usr/bin/perl + +# bucky ftp monitor +# should be owned by bucky:psacln and chmod 0755 + +# nohup ./.buckypoll.pl > .output.log 2>&1 & + +use strict; +my $localpath = "/var/www/vhosts/carbonpictures.com/bucky/incoming"; + +while (1) + { + if (-e "$localpath/.importnow") + { + system("mv", "$localpath/.importnow", "$localpath/.importing"); + system("chmod", "-R", "0777", $localpath); + system("rm", "$localpath/.importing"); + } + sleep(5); + } + |