Perlばかりやってるとアホアンチになる

このエントリーをはてなブックマークに追加
366仕様書無しさん
>>342
> やっぱり一番難しいのは正規表現でしょ。
> $vb =~ s/(http:[\/\w\.\d@\-~=:%\?\&]+)/$1<\/a>/g;
そいつをJavaで書き直すと

こうだな、
package net.2ch.www.rabbish.touchingperl;

import org.apache.oro.text.perl.*;
//import org.apache.oro.text.regex.*;

import java.net.URL;

public class PerlDemo{

 private PerlDemo(){
 }

 public static String substitute(URL url){
  String text = url.toString();

  Perl5Util perl = new Perl5Util();
  String res = perl.substitute("s/(http:[\\/\\w\\.\\d@\\-~=:%\\?\\&]+)/$1<\/a>/g", text);
  return new String(res);
}
}