shiba-yu36

hello

shiba-yu36

use strict;
use warnings;
use opts;
use autodie;
use Plack::Request;
use File::Path qw(mkpath);
use File::chdir;
use Sys::Hostname;
use Text::MicroTemplate qw(render_mt);

shiba-yu36

use strict;
use warnings;
use utf8;

use Encode;
use Encode::Guess qw/ascii utf8 euc-jp shiftjis 7bit-jis/;

my $presence_list = [qw(
    出席 出 しゅっせき
)];

shiba-yu36

package My::Schema;
use strict;
use warnings;

use Teng::Schema::Declare;
Teng::Schema::Declare->load_plugin('Column::DateTime');

table {
    name "tags";
    pk "id";

shiba-yu36

use strict;
use warnings;
use Memoize qw(flush_cache);

my $t = test::Cache->new;
warn $t->rand_method('test2');
warn $t->rand_method('test1');
warn $t->rand_method('test2');
warn $t->rand_method('test1');

shiba-yu36

use strict;
use warnings;

my $test = undef;

for my $p (@{ $test }) {
    warn '=========';
}

shiba-yu36

use strict;
use warnings;

my $test = undef;

for my $p (@{ $test }) {

}

shiba-yu36

This page was generated from the template "templates/exception.html.ep".

Oops: Unknown opcode 'super' on [5] at /Users/shibazaki/perl5/perlbrew/perls/perl-5.8.9/lib/site_perl/5.8.9/darwin-2level/Text/Xslate.pm line 288.

283: my $cache_mtime;
284: if($self->{cache} < 2) {
285: $cache_mtime = $fi->{cache_mtime} || 0;
286: }
287:
288: $self->_assemble($asm, $file, $fi->{fullpath}, $fi->{cachepath}, $cache_mtime);

shiba-yu36

use strict;
use warnings;

use LWP::UserAgent;
use HTTP::Cookies;

my $ua = LWP::UserAgent->new;
my $cookie = HTTP::Cookies->new;

shiba-yu36

key.setGlobalKey(['C-c', 'i'], function (ev, arg) {
    userscript.installPluginFromURL(window.content.document.location.href);
}, 'install-plugin-from-this-page');