トップ > _common > _common - 人気ブログ(Blog)検索結果詳細 (2008年12月2日 4時)

* ○bra welcomes Shika to the Moose family

#mooseの方のログはまったく読んでない。

01:24 < Yapp○> It thinks compatiblity to be acceptable if it satisfies it with the performance in HTTP::Engine.

01:24 < ○bra> ok

01:24 < ○bra> That sounds sane

とかそんなかんぢ

参考文献

http://7go.biz/translation/

use strict;
use Data::Dumper;
my $x = {};
warn Dumper($x);
warn "ng" unless $x->{foo};
warn Dumper($x);

$VAR1 = {};
ng at ./v.pl line 5.
$VAR1 = {};

なんだこりゃ

{
    package Foo;
    use Moose;
    use Moose::Util::TypeConstraints;

    coerce 'HashRef'
        => from 'Str'
            => via { warn "aaa"; return +{ $_ => $_ } };

    has 'uri'      => (is => 'rw', isa => ' Str | HashRef ', coerce  => 1);
}

my $f = Foo->new( uri => 'http://example.com/' );
warn $f->uri;

aaa at ./m.pl line 8.
HASH(0x97c0e4) at ./m.pl line 14.

ここ10年のうちに山手線で全2階建ての電車がぐるぐるまわったことがある。

家に帰るまでがshibuya.pmです。

北区報告をするまでがshibuya.pmです。

という事で北区。

寝る、。

* ○bra welcomes Shika to the Moose family

#mooseの方のログはまったく読んでない。

01:24 < Yapp○> It thinks compatiblity to be acceptable if it satisfies it with the performance in HTTP::Engine.

01:24 < ○bra> ok

01:24 < ○bra> That sounds sane

とかそんなかんぢ

参考文献

http://7go.biz/translation/

use strict;
use Data::Dumper;
my $x = {};
warn Dumper($x);
warn "ng" unless $x->{foo};
warn Dumper($x);

$VAR1 = {};
ng at ./v.pl line 5.
$VAR1 = {};

なんだこりゃ

{
    package Foo;
    use Moose;
    use Moose::Util::TypeConstraints;

    coerce 'HashRef'
        => from 'Str'
            => via { warn "aaa"; return +{ $_ => $_ } };

    has 'uri'      => (is => 'rw', isa => ' Str | HashRef ', coerce  => 1);
}

my $f = Foo->new( uri => 'http://example.com/' );
warn $f->uri;

aaa at ./m.pl line 8.
HASH(0x97c0e4) at ./m.pl line 14.

ここ10年のうちに山手線で全2階建ての電車がぐるぐるまわったことがある。

家に帰るまでがshibuya.pmです。

北区報告をするまでがshibuya.pmです。

という事で北区。

寝る、。