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
@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//;