diff options
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); + } + |