soh335

perl -MFilesys::Notify::Simple -e '$w=Filesys::Notify::Simple->new(["file"]); $w->wait(sub{ system "platex-utf8 -interaction-nonstopmode file && dvipdfmx file && open file"}) while(1);'

soh335

if exists("b:did_ftplugin_rst")
  finish
endif

let b:did_ftplugin_rst = 1

setlocal suffixesadd=.rst

soh335

var chat = require('socket.io').listen(80)
    .of('/chat')
    .on('connection', function(socket) {
      socket.on('message', function(msg) {
        socket.get('roomName', function(err, name) {
          console.log("[message]", name);
          chat.in(name).send(msg);
        });
      });

soh335

use strict;
use warnings;
use utf8;

use Imager;
use POSIX qw/floor/;
use Time::Piece;
use FindBin;

my $sum_type = int( rand( 20 ) ) + 260;

soh335

use strict;
use warnings;

use Benchmark qw/:all/;
use Cache::Memcached::Fast;
use Geo::Hash::XS;
use Geo::Hash;

my $memd = Cache::Memcached::Fast->new({
        servers => ["localhost:11211"]

soh335

use strict;
use warnings;

use Benchmark qw/:all/;
use Cache::Memcached::Fast;
use Geo::Hash::XS;
use Geo::Hash;

my $memd = Cache::Memcached::Fast->new({
        servers => ["localhost:11211"]

soh335

use strict;
use warnings;

use Benchmark qw/:all/;
use Cache::Memcached::Fast;
use Geo::Hash::XS;
use Geo::Hash;

my $memd = Cache::Memcached::Fast->new({
        servers => ["localhost:11211"]

soh335

use strict;
use warnings;

use AnyEvent;
use AnyEvent::Twitter::Stream;
use AnyEvent::Twitter;
use Config::Pit;
use List::Util qw/first/;

my $conf = pit_get("quick-favorite");

soh335

#!/bin/sh
exec setuidgid sugyan multilog t n1 s1048576 .

soh335

async {
	# The evil thread
	$Coro::main->ready;
};

my $done = Coro::Signal->new;

async {
    print "Please wait.\n";
    cede;