dstat2graphs - dstatのログをグラフ化するツール - SH2の日記
dstatが便利ですね。 dstat が便利 | Carpe Diem dstatの万能感がハンパない - (ひ)メモ 私は特に--outputオプションでCSV形式のログファイルを出力できるところが気に入っています。本番環境ではきちんとした監視ツールを使うと思いますが、開発・検証環境で手早くOSリソース情報を可視化できるので重宝しています。 それでもExcelやCalcでグラフを描くというのは何度も繰り返すと面倒なもので、 探したのですが見つからなかったので、連休を利用して作ってみました。 dstat2graphs - dbstudy.info サンプル1 (前回の負荷テストにおけるクライアントのグラフ) サンプル2 (サーバ) サンプル3 (KVMホスト) いくつか注意点があります。 dstat -tvfn --output log.csv 1しか受け付けないという割り切った作りです。
ISUCON4 予選でアプリケーションを変更せずに予選通過ラインを突破するの術 - Hateburo: kazeburo hatenablog
AMIが公開されたのでもう一度やってみた。 AMIについてはこちらのエントリに書かれています ISUCON4 予選問題の解説と講評 ＆ AMIの公開 : ISUCON公式Blog まず ami-e3577fe2 を m3.xlargeで起動します。 CPUは model name : Intel(R) Xeon(R) CPU E5-2670 v2 @ 2.50GHz でした。 とりあえず、MySQLのindexを追加する。init.shに追加 $ cat init.sh cat <<'EOF' | mysql -h ${myhost} -P ${myport} -u ${myuser} ${mydb} alter table login_log add index ip (ip), add index user_id (user_id); EOF ベンチマークツールのhttp keepal
FizzBuzzの最短コードを解読してみる - KWの徒然Blog。。。
[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。 この前FizzBuzzのコードをどれだけ短くできるかに挑戦して、62byteでギブアップしたとき、最短のコードが48byteだと分かった。 そのコードがこれ。 print+(Fizz)[$_%3].(Buzz)[$_%5]||$_,$/for 1..1e2 これがどういう動作をしてるのか、分からないと夜しか眠れない。 というよりも、分からないのが気に食わない。 分からないことがあるのが嫌な性分なので、分かるまで徹底的に調べてみる。 まず問題なのは、print+の部分の+。 このプラス記号は、「単項プラス演算子」という名前らしい。 これは「関数の引数を関数実行より先に評価する場合に有効」らしい。 一応perldocを見てみる。 「perlop - Perl の演算子
はてなインターンで利用したiOSアプリ等のサンプルコードを公開しました - Hatena Developer Blog
こんにちは、id:shiba_yu36です。 先日github上の「はてな教科書」に、iOSアプリ開発など新規のテキストを追加しました - Hatena Developer Blogにてはてな教科書の更新を告知しましたが、それに関連し、はてなインターン中に利用したiOSアプリ等のサンプルコードをgithub上に公開しました。 以下のサンプルコードを追加しました。 インターン用サンプルiOSアプリ インターン用サンプルiOSアプリ(簡易版) インターン用サンプルWebアプリ インターン用Webアプリケーション雛形 はてな教科書とサンプルコードをPerlでのウェブアプリケーション開発やWeb APIを利用したiOSアプリの勉強などに是非ご利用ください。何かご指摘などありましたら、GitHub上のissuesやpull requestでお知らせください。
スポーツの秋とテスト - ainameの日記
体育の日なので、テストの話を書きます。 テスト書きすぎ問題 - hitode909の日記 階層を増やしすぎるとテストが多くなりがちという問題 - はこべブログ ♨ テストと対応関係 - $shibayu36->blog; 体育の日って高速に唱えるとテストの日に聴こえる - ✘╹◡╹✘ ソフトウェア・テストと安全なソフトウェアを作ることについての思索 - 青き花へ テスト書きすぎ問題についてから始まり、テストの書き方ノウハウってあんまり共有されないよねって話があったので、自分も id:shibayu36 さんの話に乗っかるとする。 以下、テストと対応関係 - $shibayu36->blog;からコードを引用しました。 package Blog; use strict; use warnings; sub new { my ($class, $args) = @_; return bless
本番環境でのperl/ruby/nodeのセットアップ - たごもりすメモ
本番環境にperlとかrubyとかnodeを入れるんだけど、もちろん system perl じゃやってられないので指定したバージョンのものを一般ユーザの管理下に突っ込みたい。 で、そういうのをこれまで perlbrew とか rvm とか rbenv とか nvm とか nodebrew とかでやってたんだけど、さすがに色々疑問が湧いてきた。バッチで単発実行するために eval "$(rbenv init -)" とかさすがにおかしくね？ みたいな。 ということで tokuhirom method 的にインストール用の簡単コマンドを使って実行、あとはパスを通せばいいじゃん、ということにしようかと思う。 参考: サーバーのセットアップは perlbrew とかじゃなくてよくね? という時のライフハック - blog.64p.org これ、今朝までは Perl::Build をどうにかしてC
Perlいつやるの？今でしょ！ - maeharinの日記
ゆーすけべー先生のPerl入門書がKindle本で出ました。詳細はこちら Perlについて語ろうposted with amazlet at 13.03.17和田裕介 (2013-03-13) Amazon.co.jpで詳細を見る 僕はRuby, PHP, JavaScriptしかまともに触った事が無かったのですが、 心の中からこんな声が聞こえました↓ はいぃぃぃぃ！ということで、Perl入門してみることにしましたです。ちなみにゆーすけべー先生のKindle本には、Perlの基礎文法〜Webアプリの作り方まで、結構広範囲についてサクッと書かれていたのですが、各章の「キリ」がよくて、つまみ食いしながら読み進めることができる感じ。なので自分はまず基礎文法だけやってみたです（細かいところはすっとばして、頻出しそうなところだけつまみ食い）。 ※ 以下のコードはKindle本に出てくるサンプルコード
第13回 メタオブジェクトプロトコル入門(1） | gihyo.jp
本連載では第一線のPerlハッカーが回替わりで執筆していきます。今回はPerl 5上で先進的なオブジェクト指向を実現するためのフレームワークMooseなどの開発に関わっているShawn Moore（sartak）さんと、Japan Perl Associationの理事である牧大輔さんが、「メタオブジェクトプロトコル」について解説します。 メタオブジェクトプロトコル（MOP）とは さまざまなプログラミング言語がオブジェクト指向機能を提供していますが、オブジェクトの構造を細部にわたって閲覧したり、デフォルトの挙動を拡張したりすることまでできる言語はそれほど多くありません。 このような操作を行いたい場合は「メタオブジェクトプロトコル」（以降：MOP）と呼ばれる技術を利用します。MOPは、オブジェクトのメソッドやアトリビュートなどを含む内部構造そのものを、オブジェクトで表現するしくみです。P
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
hide-k.net#blog: MooseとClass::MOPでメタプログラミング始めた
今、超熱いMoose始めたよ。 で、Moose理解するにはClass::MOP理解しなきゃいけなくて、Class::MOP理解するにはMOP理解しなきゃいけないので、ircでえろい人たちに色々教わったのでメモ。 メタプログラミング メタプログラミング - Wikipedia ロジックを直接コーディングするのではなく、あるパターンをもったロジックを生成する高位ロジックによってプログラミングを行う方法 んで、これを実現するために必要なのがメタクラスとMOP。 MOP(メタオブジェクトプロトコル) メタクラスを通してオブジェクトシステムへアクセスするAPI メタクラス クラスの振る舞いを定義したクラスでイントロスペクション(introspection)とインターセッション(itercession)を備える イントロスペクション オブジェクトの属性を得る能力 ex) 何のクラスを継承してい
404 Blog Not Found:perl - ワンライナーの書き方入門
2008年03月30日19:45 カテゴリLightweight Languages一日一行野郎 perl - ワンライナーの書き方入門 まあ、ruby のコマンドラインオプションって、Perl由来ですから。 Rubyでワンライナーを書く方法のまとめ まぁ、Perlもあるしあんまり需要が無いのかも知れませんが。 というわけで、Rubyistにも役立つPerlのワンライナー入門です。 基本中の基本 コマンドとしてのperlは、スイッチがない場合、引数はスクリプト名として扱われます。 % cat hello.pl print "Hello, world!\n"; % perl hello.pl Hello, world! % コマンドライン中の文字列をスクリプトとして解釈させるには、-eを使います。 % perl -e 'print "Hello, World!\n"' Hello, worl
ref関数〜変数の型を確認したい〜 - WEB開発初心者の成長記録
ref関数は、引数によって真か偽かを返す関数です。 ■引数がリファレンスの場合 「真」つまり、リファレンスが参照する型を返します。 なお、返す型は以下です。 ・SCALAR スカラー ・ARRAY 配列 ・HASH ハッシュ ・REF リファレンス ・CODE サブルーチン ・パッケージ名 blessされているもの ・GLOB 型グロブ ■引数がリファレンスでない場合 「偽」を返します。こんな感じで使います。 ■処理内容 #$kをハッシュのキーに、$vをハッシュの値(value)として%paramsに追加していきたい。 #$kがすでに存在しているキーの場合、値(value)を配列のリファレンスにして$vを入れる #つまり、キーの重複によるvalueの上書きはしない ■スクリプト #$kがすでにハッシュのキーとして存在していなければ普通にキー、valueと
Moose::Cookbook::Recipe7 - make_immutable - - 日向夏特殊応援部隊
Moose::Cookbook::Recipe7 - Making Moose fast with immutable - metacpan.org 今度は make_immutable について。 ソース package PointImmutable; use Moose; has 'x' => (isa => 'Int', is => 'ro'); has 'y' => (isa => 'Int', is => 'rw'); __PACKAGE__->meta->make_immutable; package PointNoImmutable; use Moose; has 'x' => (isa => 'Int', is => 'ro'); has 'y' => (isa => 'Int', is => 'rw'); package PointCAF; use base qw(Cla
Mooseメモ – Rest Term
業務メモ。 Class::Accessor::Fast を使って書かれたモジュール群を Moose を使って書き換え中。。 使い始めてまだ3日くらい。使いこなせるようにがんばる。 Mooseについて Mooseは Meta Object Protocol (MOP) という概念を採用したオブジェクト定義の技法を提供する。 (Class::MOP のラッパー) Webアプリケーションフレームワークの Catalyst も5.8系からMooseベースになったとのこと。 型制約 Mooseで指定したアトリビュートは、生成されたアクセサで値を設定する際にバリデーションを走らせることができ、has に渡す isa 引数に型を指定することによってトリガーされる。以下は組み込みで定義されている型制約の図。Maybe[‘a] は、例えば Maybe[Int] と指定した場合、Int または undef と
perlでハッシュとかのカッコの前に付いてるプラスの意味 - 新だるろぐ跡地
{}の前にプラスが付いて、+{}とかなってるのをよく見るけど、やっとこれの意味が分かったのでメモ。 このカッコはハッシュ以外にも使われるから、「これはハッシュリファレンスですよ」と明示するためのもの。 use strict; use warnings; use Data::Dumper; local $\ = "\n"; sub p { print Dumper shift; } sub hashref_ng { { @_ } } sub hashref_ok { +{ @_ } } my $ng = hashref_ng(1,2,3,4); my $ok = hashref_ok(1,2,3,4); p $ng; p $ok; 実行結果 % perl hashref.pl $VAR1 = 4; $VAR1 = { '1' => 2, '3' => 4 }; こんな常識も知らずにおりますよ
モジュールのバージョンを確認するときどうやってますか？ - Articles Advent Calendar 2010 Casual
もう恋なんてしないなんて、言わないよ絶対kamipoです。 ときに皆さん、Perlのモジュールのバージョンを確認するときどうしてますか？ 僕はPerlをはじめた最初のころ、ずっとこうやっていました。 $ perl -MAcme::Hidek -le 'print $Acme::Hidek::VERSION' 40.0 こうやってたの、僕だけじゃないですよね！？ いまでは以下のワンライナーにaliasを張っているので毎回がんばってワンライナーを打たなくてよくなりました。 $ alias pmversion='perl -le '"'"'for $module (@ARGV) { eval "use $module"; print "$module ", ${"$module\::VERSION"} || "not found" }'"'" $ pmversion Acme::Hidek Ac
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
https://github.com/onishi/mysqldiff/blob/master/mysqldiff
最近は local::lib を直接つかわないでもいきていけるという話 - tokuhirom's blog
Perlゼミ(サンプルコードPerl入門)
Moose::Cookbook のお勉強 - 目次 - 日向夏特殊応援部隊
