2009-01-23から1日間の記事一覧

第32回 前回のソースの説明

さて、どこから説明したらいいものやら...... という感じなのですが、前回のソースの説明をしたいと思います。前回のソースはもうひとつ窓を開けてもらって(別のブラウザとかで見てもらって)ここでは、部分的に説明していきたいと思います。 まずは、 new …

第35回 Perlで小技3

CSVから配列に落とし込む use strict; my $c = 'aaa,bbb,ccc,ddd'; my @d = split ',', $c, -1; print $_, "\n" for @d; 結果 aaa bbb ccc ddd CSVをTSVに変換 置換バージョン use strict; my $c = 'aaa,bbb,ccc,ddd'; $c =~ s/,/\t/g; print $c, "\n"; 結果…

第34回 Perlで小技2

Perlでファイルをopenするときは、以下のような感じで書きます。 ファイルを読み込む例 use strict; open my $f, '<', 'hoge.txt'; while(<$f>){ print $_; } という変わった記号(行入力演算子と呼ばれる演算子)と、whileのコンビで1行ずつ読み込みができ…

第33回 Perlで小技1

今回からは、Perlを使って、 細かいことや、こんなことが(簡単に)できるよーといったことをツラツラと書いていこうと思います。 (オブジェクト指向に関しては残念ながら前回で終了にします) ピラミッド よく大学のプログラムの授業で、 * ** *** ****と…