デフォルト見づらかったので変えた。
use Cinnamon::DSL; set max_concurrency => { restart => 1, 'server:setup' => 2, }; role production => sub { my $res = LWP::UserAgent->get('http://servers.example.com/api/hosts'); my $hosts = decode_json $res->content; $hosts; }, { branch => "master", }; task update => sub { my ($host, @args) = @_; # ... }; task restart => sub { my ($host, @args) = @_; # ... }; task server => { setup => sub { my ($host, @args) = @_; # ... }, };
設定
/* Syntax-Highlight ----------------------------------------------------------------------------------------------------*/ pre.code { background-color: #444; color: #FFF; border-color: #333; } span.synSpecial { color: #fff; } span.synPreProc { color: #f69; } span.synStatement { color: #00ffff; } span.synIdentifier { color: #eedd82; } span.synConstant { color: #ffa07a; } span.synType { color: #ddd; } span.synComment { color: #ff4500; }