2013-01-01から1年間の記事一覧

Perl の文字列中で式を展開する

Perl は文字列中に変数を書くと展開してくれる my $name = "koko_u"; print "Hello,$name\n"; 出力 Hello,koko_uしかし、式を計算することはできない my $name = "koko_u"; my $times = 3; print "Hello,${name}'!'x$times\n"; こんな感じで "" 中で '!'x$ti…

Perl の while 文で continue

Perl の while 文の中で、next とか last とかできるのは知ってたけど my $counter = 0; while ($counter < 5) { print "$counter\n"; } continue { $counter++; } とか書けるんか。知らんかった。 while の本体で next ですっとばされても $counter を間違…

rubyで簡単なツールを作る時の備忘

個人的に使用するだけのコマンドラインツールをrubyで作成する時の手順を備忘録として残しておく1. テンプレートの作成 $ bundle gem awesome_tool -b -t -b が実行ファイルを bin の下に作成。-t がテスト含む2. gemspec 編集development_depencency に適当…

ruby で変数が nil の時にアサインするあれ

ruby でよく変数 name に値が設定されていない時だけデフォルトの "山田権兵衛" とか設定したい時に name ||= "山田権兵衛" という記述が紹介されるけど、これって name が false の時も権兵衛さんになっちゃうけど、設定されていない(=nil)の時だけに値を入…

main 関数で exit(0) と return 0 の違い

つまりローカル変数のデストラクタが呼ばれるかどうか、ということ。exitの時 #include <iostream> using namespace std; class Foo { public: Foo() {} ~Foo() { cout << "Destructor was called." << endl; } }; int main() { Foo foo; exit(0); } 結果 $ ./a.out $r</iostream>…

Perl の ==

今さらだけど、perl で数値を比較(==)するとき、値が等しいと数値(1)、異なっていると文字("")が返ってくるのか。 キモいな。。。

plenv で perl の切り替えがうまく行かないメモ

ずっと Perl のバージョンを切り替えるツールとして perlbrew を使っていたけど、気がむいたので GitHub - tokuhirom/plenv: Perl binary manager を使ってみようとして失敗した時のメモ 現象 $ plenv global perl-5.16 とすると 5.16 is not installed on p…

Ubuntu で pogoplug を使う時のメモ

クラウドサービスじゃない、機器の方のPogoplugに普通にUSBのハードディスクを繋いで使う時のメモ公式サイトでは 32bit 版の pogoplugfs バイナリしか用意されれいないので、64bitでUbuntuをインストールしていると結構困る。 以下手順1.クロスコンパイルの…