Skip to content

Instantly share code, notes, and snippets.

View JEEN's full-sized avatar

Jeen Lee JEEN

View GitHub Profile

MojoX::JSON::XS

sub startup {
    ....
    $self->plugin('MojoX::JSON::XS');
}
@JEEN
JEEN / gist:1413092
Created December 1, 2011 02:58
Advent 301
....
ServerName advent.perl.kr
RewriteEngine On
RewriteRule ^/2010-(.*) http://%{HTTP_HOST}/2010/2010-$1 [R=301,L]
RewriteRule ^/$ http://%{HTTP_HOST}/2011/ [R=301, L]
...
@JEEN
JEEN / insert.pl
Created June 15, 2011 15:04
TokyoCabinet and corr
#!/usr/bin/env perl
use TokyoCabinet;
use strict;
use warnings;
use Text::CSV_XS;
$| = 1;
if(@ARGV < 1) {
print "Usage: $0 corrfile\n";
exit 1;