人工無脳づくりを再開する前にすること

Programming Perl 人工無脳
  • ロシア語の予習
  • 物理学実験のレポート
  • Perlのリファレンス変数を理解する。（ポインタみたいなもんっぽい）
  • Perlの手続き型的プログラミング方法を理解する。
  • Perlのオブジェクト指向的プログラミング方法をさらっと眺める。

今まで書いたPerlスクリプトはまったくもって行指向なプログラムなので、初学者にわかりやすいかもしれません。「$_」まわりの省略をしたりしなかったりしてるので、やっぱりわかりにくいかもしれません。

今ちらっと眺めて、

  if(defined($wordhash{$word})){
    $wordhash{$words[$length-1]} .= ",\\eos";
  }else{
    $wordhash{$words[$length-1]} .= "\\eos";
  }

は

  if(defined($wordhash{$word})){
    $wordhash{$words[$length-1]} .= ",";
  }
  $wordhash{$words[$length-1]} .= "\\eos";

こう書いた方がスマートかなあと思ったけどそうでもないかも。

test