OSDN Git Service

add tweet worker
authorISHIKAWA Mutsumi <ishikawa@hanzubon.jp>
Tue, 6 Nov 2012 10:09:44 +0000 (19:09 +0900)
committerISHIKAWA Mutsumi <ishikawa@hanzubon.jp>
Tue, 6 Nov 2012 10:09:44 +0000 (19:09 +0900)
mubot4fb_tweet_worker.pl [new file with mode: 0755]

diff --git a/mubot4fb_tweet_worker.pl b/mubot4fb_tweet_worker.pl
new file mode 100755 (executable)
index 0000000..b5a99c2
--- /dev/null
@@ -0,0 +1,19 @@
+#!/usr/bin/perl
+
+use strict;
+use utf8;
+
+use Data::Dumper;
+
+use FindBin;
+use lib ("$FindBin::Bin/lib", '/usr/share/mubot4fb/lib');
+
+use Mubot4FB::TweetWorker;
+use Mubot4FB::Worker;
+
+my $config_name = $ARGV[0] || 'not_found';
+my $worker_name = 'Mubot4FB::TweetWorker';
+
+my $worker = Mubot4FB::Worker->new($config_name, $worker_name);
+
+$worker->run();