Skip to content

Instantly share code, notes, and snippets.

View memememomo's full-sized avatar
🏠
Working from home

Uchiko memememomo

🏠
Working from home
  • Aichi, Japan
View GitHub Profile
@ishiduca
ishiduca / gist:1229457
Created September 20, 2011 15:45
COMIC ZIN検索の結果を ハッシュリファレンスで返す
package WWW::Search::Scrape::Zin;
use strict;
use utf8;
#use Encode;
use Carp;
use URI;
use URI::Escape;
use Web::Scraper;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
@hideo55
hideo55 / io-scalar.pl
Created May 30, 2011 14:40
STDERR into scalar
use Test::More tests => 1;
use strict;
use warnings;
local *STDERR;
my $stderr;
open STDERR, '>', \$stderr or die $!;
warn 'error';
#!/usr/bin/perl
use strict;
use warnings;
use Encode;
use utf8;
use JSON;
use Text::Xslate;
use Plack::Request;
use Data::Rmap qw//;