罪と罰++二律背反


  • 	if($camp eq'' || $camp < 1 || $camp > 5){
    	# if($camp eq'' || $camp < 1 || $camp > 5){
    	if (0==1) {
  • 				$log .=qq|<tr align="left" bgcolor="#ccccee"><td style="font-size:12px" colspan="9">&gt;&gt; 備考: $seibetu[$SEI_V]&nbsp;&nbsp;&nbsp;&nbsp;格言: $MES_V</td></tr>\n|;
    			}
    		}
    
    	# }else{			# ↑の2行に加えて
    	}elsif( 1==0 ){		# ←この2行を修正
    
    		foreach(0 .. $#tdat){
    			%R = '';
    			my @prats = split(/,/,$tdat[$_]);
    			foreach $prats (@prats){


トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2012-06-08 (金) 00:28:39 (4776d)