|
たまに出てきてアホな質問で住みません。 Perl で質問です。 (1) $path = '/usr/local/nantoka/us/us/file'; の /us/ を /jp/ に変えようと思ったら、 $path = s|/us/|/jp/|g; ではうまくいきません。 $path =~ s|/us/|/jp/| while $path =~ m|/us/|; ではうまくいったのですが、こんなんでいいんでしょうか。 (2) コマンドラインの mkdir -p で中間的なディレクトリをイッキに 作ってくれますが、Perl の mkdir では作ってくれません。 いまは `` でコマンドを呼んでいますが、これもしょうがないでしょうか。 |