久々に残業。クタクタになる。帰ってコーディングの続きを少しやった。帰宅途中のコンビニで買ったビールはそのまま冷蔵庫へ。夜遅くの飲酒は翌日に持ち越すから。 夜10時の駅前のコンビニは所在なさげな中年男性と仕事帰りのサラリーマンがいた。小さいこど…

正規表現にマッチする文字列をすべて取りだそうとしてwhileループを試みたとき、無限ループになってハマった。 while ( $text =~ /$regex{$maker}{item}/sm ) { #無限ループ print "match\n"; $parsed{ $+{pos} }{item_name} = $+{item_name} // ''; } 解決…