perl - 勝手に添削 - 相対パスを絶対パスに変更する : 404 Blog Not Found
2010年12月28日23:30 カテゴリ perl - 勝手に添削 - 相対パスを絶対パスに変更する Perl & XML Erik T Ray / Jason McIntosh 財井一彰訳 [原著:Perl & XML] 一昔前のentryが、はてぶで引っかかっていたので。 相対パスを絶対パスに変更する | perl | 俺のメモ URIオブジェクトは直接文字列として扱える まずはこれ。何とprintされるでしょう? use 5.010; use strict; use warnings; use LWP::UserAgent; use URI; my $base = 'http://japan.cnet.com/news/business/story/0,3800104746,20416479-0,00.htm'; say URI->new_abs('/news/service/',
相対パスを絶対パスに変更する | 俺のメモ
LWP等で取得してきたコンテンツをごにょごにょしようとしてもリンク先が相対パスだったら画像等がリンク切れで非常に扱いにくい。 後にその画像だけを取得したい時等。 これがすべて下記のように変換されていると何かと便利 <img src="../../header.gif" /> ↓ <img src="http://japan.cnet.com/news/header.gif" /> URIモジュールを使うのその変換を数行のコードでやってくれます。 #!/usr/bin/perl -w use strict; use warnings; use utf8; use LWP; my $link = 'http://japan.cnet.com/news/business/story/0,3800104746,20416479-0,00.htm'; my $ua = LWP::UserAgent-
たとえば、Cwd::cwd()ではなくCwd::getcwd()を使う - Islands in the byte stream
2010年11月09日 たとえば、Cwd::cwd()ではなくCwd::getcwd()を使う Module::InstallベースのMakefile.PLが異様に遅いのでDevel::NYTProfでプロファイルを取ったところ、Cwd::cwd()が非常に遅いことがわかった。そこでこれをCwd::getcwd()に置き換えたところ、明らかにMakefile.PLの実行が高速になりキビキビと動くようになった。 調べてみるとこのcwd()、なんと内部で`pwd`を行っているのだ！そしてModule::Installはcwd()を大量に呼んでおり、これだけで秒単位の時間を消費していたのだった。 cwd()が`pwd`と同じだということは、Cwd.pmのpodにも書いてある。 $ perldoc Cwd ... getcwd my $cwd = getcwd(); Returns the cur
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
