comment out gearman requirement

diff --git a/rsync-piper.pl b/rsync-piper.pl
index 12574eb..0bb827b 100755 (executable)
--- a/rsync-piper.pl
+++ b/rsync-piper.pl
@@ -147,9 +147,11 @@ if ( ! -e $pid_file ) {
        }
 }
 
+=for gearman
 use Gearman::Client;
 my $gearman = Gearman::Client->new;
 $gearman->job_servers('127.0.0.1:4730');
+=cut
 
 while(1) {
        warn "# reading log output from $log_fifo\n";
@@ -184,7 +186,9 @@ while(1) {
 
                        my $json = CloudStore::JSON::rsync_transfer \%data;
 
+=for gearman
                        $gearman->dispatch_background( 'rsync_transfer' => $json );
+=cut
 
                }
        }