Dockerと付き合っていく上で考えるべきことのメモ
This file contains 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
exports.handler = (event, context, callback) => { | |
const response = { | |
statusCode: 301, | |
headers: { | |
Location: 'https://google.com', | |
} | |
}; | |
return callback(null, response); | |
} |
This file contains 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
script_line1 = use strict | |
script_line2 = use warnings | |
script_line3 = use 5.018002 | |
script_line4 = use Otogiri; | |
script_line5 = use Otogiri::Plugin; | |
script_line6 = my $connect_info = ["dbi:...",'username','password', { AutoCommit => 1, RaiseError => 1,PrintError => 0, pg_enable_utf8 => 1,}]; | |
script_line7 = Otogiri->load_plugin('DeleteCascade'); | |
script_line8 = my $db = Otogiri->new( connect_info => $connect_info ); | |
[Interrupt] |
サイズがあまりに大きくなってしまったので、gist ではなくて github 上で管理するようにしました。
https://github.com/Shinpeim/process-book
URL 変わっちゃうの申し訳ないんだけど、一覧性が高くなるのと pull req が受け取れるメリットのほうを取ります。せっかく読みにきてくれたのにひと手間かかっちゃってすみません。
This file contains 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/env perl | |
#cf. http://d.hatena.ne.jp/W53SA/20130109/1357750514 | |
use strict; | |
use LWP::Simple; | |
use XML::Atom::Feed; | |
use URI; | |
use File::Basename; | |
use Digest::HMAC_SHA1; |
This file contains 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
//12/17 11:30頃に確認した結果 | |
//自由民主党 16,624,457票 27.62% 57議席 31.66% | |
//日本維新の会 12,262,228票 20.37% 40議席 22.22% | |
//民主党 9,628,653票 15.99% 30議席 16.66% | |
//公明党 7,116,474票 11.82% 22議席 12.22% | |
//みんなの党 5,245,586票 8.71% 14議席 7.77% | |
//日本共産党 3,689,159票 6.13% 8議席 4.44% | |
//日本未来の党 3,423,915票 5.68% 7議席 3.88% | |
//社会民主党 1,420,790票 2.36% 1議席 1.11% | |
//新党大地 346,848票 0.57% 1議席 1.11% |
This file contains 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 5.012; | |
use WebService::Simple; | |
my $target_username = "plack"; # <= It's test var! Hehe. FIXME | |
my $target_reponame = "Plack"; # <= It's test var! Hehe. FIXME |
This file contains 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 | |
# "pflog" enhancement for parsing maillog of postfix 2.3 or higher version. | |
# "pflog" see: http://www.tmtm.org/ruby/pflog/pflog-0.3 | |
use strict; | |
use warnings; | |
use Time::Local; | |
use Getopt::Long; | |
#use Data::Dumper; |
NewerOlder