06/07/19 19:54:09 NSduSNRS0
スレリンク(chakumelo板:133番)
> 133 :携帯電話情報通知しません :2006/07/19(水) 17:34:08 ID:HGOwIHG50
> 'ツール類'を追加しようとしたところで500が出ちゃうよ(;´д⊂ヽヒックヒック
> 一応使えるんですけど板一覧にごみが残ります
> URLリンク(nov.s56.xrea.com)
> ##/設定部分/################################################
> my $menu = 'URLリンク(menu.2ch.net)'; #板一覧の取得URL
> my @skip = ('おすすめ','特別企画','2chプロジェクト','チャット','運営案内');
> my $last = '<BR><BR><B>まちBBS</B><BR>';
> ############################################################
> 板リスト自動生成スクリプトをうまく動作させるにはどうすればいい?達人な方お願いします_| ̄|○
URLリンク(www.web-ware.org)を参考にして真似をして、こんな感じに。。。
#正規表現エスケープ用関数
sub esc4re{
my $str = shift;
$str =~ s/([\x21\x24-\x26\x28-\x2b\x2e\x2f\x3f\x40\x5b-\x5e\x7b-\x7d])/\\$1/g if $str;
return $str;
}
$teststr = 'ツール類';
$restr = &esc4re($teststr);
##/設定部分/################################################
my $menu = 'URLリンク(menu.2ch.net)';
my @skip = ('おすすめ','特別企画','2chプロジェクト','2NN+','いろいろランク','チャット','運営案内',$restr);
my $last = '<BR><BR><B>まちBBS</B><BR>';
############################################################