- 635 名前：デフォルトの名無しさん [2006/10/23(月) 14:49:23 ]
- >>634
ごめんなさい、わからないんです。
とりあえず、ここまでは出来ました
「開始」と「終了」に挟まれる$1を抽出した後、その$1をURL形式に変えてアドレスにして置き換えていきたいんです。
例えば
$in{'data'}="開始なにか終了hogehogehoge開始てすと終了"だったとしたら
これが
$in{'data'}="<a href=hoge.com/hoge.cgi?keyword=%42%28%39>なにか</a>hogehogehoge<a href=hoge.com/hoge.cgi?keyword=%32%86%26>てすと</a>"
みたいな形式に置き換えたいんです
use URI::Escape;
$START="開始";
$END="終了";
$SEARCHADD="hoge.com/hoge.cgi?keyword=";
while ($in{'data'}=~ m/$START(.*)$END/g) {
$output = $1;
$urikeyoutput = uri_escape($output);
$in{'data'} =~ s/$START$output$END/<a href=$SEARCHADD$urikeyoutput>$output<\/a/g;
}
|
 |
