Perlについての質問箱 29箱目
■ このスレッドは過去ログ倉庫に格納されています
0112デフォルトの名無しさん
2006/12/29(金) 17:34:07use strict;
use warnings;
while (<DATA>) {
s{(h?ttps?://([^\s ]+))}{<a href="http://$2">$1</a>}g;
print $_;
}
__DATA__
これhttp://www.example.com/1.txt とttp://www2.example.com/2.txt これ
URLのパターンマッチはこれだと甘いけど。
>108
use encodingはきちんと理解して使わないとバグの元にしかならないから反対。
■ このスレッドは過去ログ倉庫に格納されています