くだすれPerl（超初心 ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
178:nobodyさん 08/05/08 21:29:39 正規表現でどうにかする方向は>>176さんに任せつつ。 >>173 use File::Spec; print File::Spec->canonpath('ABC/DFG/HIJ/../../'); # ABC 末尾のデリミタが消えたりしますが。 179:176 08/05/08 21:40:41 質問の趣旨がようやくわかった。ファイルパスの操作か。 こんなことしてどうするんだろうとか不思議に思ってた。 なんか寝ぼけてるな。 これを正規表現でどうにかしたのをみてみたい。 180:173 08/05/08 22:04:20 わ、最初からファイルパスと言うべきでした。すみません。 RSS出力のCGIをいじってて、文章中にあるリンクやimgタグがRSSフィードでは 絶対パスでないと働かないので、相対パスになってた時に絶対パスに置き換わるように したかったのです。 $RSS_BASE_URI = "http://$ENV{'HTTP_HOST'}$ENV{'SCRIPT_NAME'}"; $RSS_BASE_URI2 = &GetDir($RSS_BASE_URI); 元のCGIにこれがあるので、 $str =~ s/href=\"/href=\"$RSS_BASE_URI2/g; $str =~ s/src=\"/src=\"$RSS_BASE_URI2/g; $str =~ s/http\:\/\/.*?\/http\:\/\//http\:\/\//g; $str =~ s/\/\.\//\//g; $str =~ s/\/[^\/]*\/\.\.\//\//g; こうやってみたんですが…（見にくくてすみません） こういう書き方をするようなものではないのでしょうか？ >>178 すみません、記事の中からURLを抜き出して当てはめるにはどうすれば…
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
5310日前に更新/136 KB
担当:undef