くだすれPerl（超初心者用）2

くだすれPerl（超初心 ..

173:nobodyさん
08/05/08 20:29:16
ABC/DFG/HIJ/../　　→　　ABC/DFG/
こういうのが　　　　　　　　　こういう感じで置き換わるように

$str =~ s/\/[^\/]*\/\.\.\//\//g;
こうやってみたのですが

ABC/DFG/HIJ/../../　　→　　ABC/DFG/../
こういうのは　　　　　　　　　こうなっちゃいます

ABC/DFG/HIJ/../../　　→　　ABC/
こうなってくれるにはどうしたらいいですか？

次ページ

続きを表示

1を表示