This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
use Test::More tests => 1; | |
use strict; | |
use warnings; | |
local *STDERR; | |
my $stderr; | |
open STDERR, '>', \$stderr or die $!; | |
warn 'error'; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/perl | |
use strict; | |
use warnings; | |
use Encode; | |
use utf8; | |
use JSON; | |
use Text::Xslate; | |
use Plack::Request; | |
use Data::Rmap qw//; |
NewerOlder