08/02/07 15:02:53
use utf8;
use Encode;
use WWW::Mechanize;
my $start = "URLﾘﾝｸ(***.com)";
my $mech = WWW::Mechanize->new( autocheck => 1 );
$mech->get( $start );
my $phrase = 'こんにちは';
$mech->follow_link( text_regex => qr/$phrase/);
.....
見たいなコードを書いて日本語のページ(shiftjis)をとりに行ってるんだけど、
getのときの文字コードの判別がうまくいかないので、
text_regexがうまく動かないんですが、いい方法ないですか？