# 方法1 Text::ParseWords use Text::ParseWords; sub parse_csv0 { return quotewords("," => 0, $_[0]); } # 方法2 Text::CSV use Text::CSV; sub parse_csv1 { my $line = shift; my $csv = Text::CSV->new(); return $csv->parse($line) && $csv->fields…

読み込んだ文字列の先頭または末尾に空白文字が付加されている場合は、それらを削除したい。 $string =~ s/^\s+//; $string =~ s/\s+$//;

文字列中の特定文字(クォート, カンマなど)をエスケープしたい。 # 置換を使用して、エスケープする各文字にバックスラッシュをつけるか、 # 各文字を二重にする。 # バックスラッシュを付ける $var =~ s/([CHARLIST])/\\$1/g; # 二重にする $var =~ s/([CHA…

文字列が長過ぎてスクリーンに収まりきらない。文字列を複数行に分割する方法 # Text::Wrapを使う use Text::Wrap; @output = wrap($leadtab, $nexttab, @para); # Text::Autoformatを使う(こちらの方がより優れている) use Text::Autoformat; $formatted = …

ヒアドキュメントを利用すれば複数行をクォートできるが、テキストを左余白に詰めて書かなければならない。コード内のヒアドキュメントをインデントする方法 # すべて一度に行う ($var = << HERE_TARGET) =~ s/^\s+//gm; your text goes here HERE_TARGET # …

最近、気づいたのですが、歌を歌ってあげると(というか、ただ単に口ずさんでいるだけですが)、結希未ちゃんはよく寝ます．今のところ、中村一義と斉藤和義しか歌っていないのですが、かなりの確率で寝てくれます．さすが、結希未ちゃん！！ 音楽がよくわかっ…