Cmd-Dwarf
view release on metacpan or search on metacpan
<meta name="description" content="">
<meta name="author" content="">
<!-- Le styles -->
<link href="/dwarf/bootstrap/css/bootstrap.css" rel="stylesheet">
<style>
body {
padding-top: 60px; /* 60px to make the container go all the way to the bottom of the topbar */
}
</style>
<link href="/dwarf/bootstrap/css/bootstrap-responsive.css" rel="stylesheet">
</head>
<body>
<div class="container">
<h1>400 Bad Request</h1>
: if $error {
<!-- error messages -->
<dl class="alert">
<dt>å
¥åå
容ã«ä¸åãããã¾ããã</dt>
<dd>
<ul>
: if $error.category.UINT {
<li>種å¥ã¯å¿
é é
ç®ã§ãã鏿ãã¦ãã ããã</li>
: }
: if $error.name.NOT_NULL {
<li>åååã»é¸åã¯å¿
é é
ç®ã§ããå
¥åãã¦ãã ããã</li>
: }
: if $error.introduction.NOT_NULL {
<li>ç´¹ä»æã¯å¿
é é
ç®ã§ããå
¥åãã¦ãã ããã</li>
: }
</ul>
</dd>
</dl>
: }
</div> <!-- /container -->
</body>
</html>
## Dwarf::Pragma
use ããã¨åºæ¬çãªãã©ã°ããã¾ã¨ãã¦ã»ããããã·ã§ã¼ãã«ããã®å½¹å²ãããã¯ã©ã¹ã§ãã
use strict;
use warnings;
use utf8;
use feature '5.10';
use boolean;
ãªãã·ã§ã³ã§ utf8 㨠feature ã®æåã¯å¤æ´ãããã¨ãåºæ¥ã¾ãã
sub import {
my ($class, %args) = @_;
$utf8 = 1 unless defined $args{utf8};
$feature = "5.10" unless defined $args{feature};
warnings->import;
strict->import;
boolean->import;
boolean->export_to_level(1);
if ($utf8) {
utf8->import;
}
if ($feature ne 'legacy') {
require 'feature.pm';
feature->import(":" . $feature);
}
}
## Dwarf::Accessor
ã¢ã¯ã»ãµã使ããããã®ã¯ã©ã¹ã§ãã
### Lazy Initialization
ã\_build\_ + ããããã£åãã¨ããã¡ã½ãããå®è£
ãããã¨ã§ãåæå¤ãé
å»¶çæãããã¨ãåºæ¥ã¾ãã
use Dwarf::Accessor qw/json/;
sub _build_json {
my $json = JSON->new();
$json->pretty(1);
$json->utf8;
return $json;
}
## Dwarf::Message
ãã£ã¹ãããå¦çã®ä¸ã§éåºå¯è½ãªã¡ãã»ã¼ã¸ã¯ã©ã¹ã主ã«ãã¬ã¼ã ã¯ã¼ã¯ãã¨ã©ã¼ãã³ããªã³ã°ãªã©ã«å©ç¨ãã¦ãããnot\_found ã¡ã½ããã redirect ã¡ã½ãããå©ç¨ãã¦ãã finish ã¡ã½ãã...
## Dwarf::Trigger
ããªã¬ã¼ã¯ã©ã¹ãDwarf ãæä¾ãã¦ããããªã¬ã¼ã¯ BEFORE\_DISPATCH / AFTER\_DISPATCH / ERROR / SERVER\_ERROR ã®å種é¡ãã¾ããDwarf::Plugin::Text::Xslate ãªã©ã®ãã©ã°ã¤ã³ã¯èªã¿è¾¼ã¾ãã㨠BEFORE\_RENDER / AFTER\...
$c->add_trigger(BEFORE_RENDER => $self->can('will_render'));
$c->add_trigger(AFTER_RENDER => $self->can('did_render'));
$c->add_trigger(ERROR => $self->can('receive_error'));
$c->add_trigger(SERVER_ERROR => $self->can('receive_server_error'));
## Dwarf::Util
ã¦ã¼ãã£ãªãã£ã¯ã©ã¹ã以ä¸ã®ã¡ã½ããã @EXPORT\_OK ã§ããã
### ã¡ã½ãã
#### add\_method
#### load\_class
#### installed
#### capitalize
#### shuffle\_array
#### filename
( run in 2.163 seconds using v1.01-cache-2.11-cpan-5735350b133 )