root/websites/mato.me/trunk/khatena/maintrule.pl @ 26442

Revision 26442, 511 bytes (checked in by unau, 6 years ago)

imported site data for mato.me and it's subdomains.

RevLine 
[26442]1#!/usr/bin/perl
2BEGIN {
3    unshift(@INC, '/home/gorbachev/lib');
4}
5use Avelio::SympleRuleStorage qw(/home/gorbachev/rules);
6
7my ($action, $prefix) = @ARGV;
8my $storage = new Avelio::SympleRuleStorage($prefix);
9
10if (   $action eq 'show')   {    $storage->showRules();              }
11elsif ($action eq 'update') {    $storage->updateRulesWithSTDIN();   }
12elsif ($action eq 'test')   {                                        }
13else                        {    exit;                               }
14
15# end of file
Note: See TracBrowser for help on using the browser.