ぜろちゃんねるプラス質問スレ

824 ：0ch+開発担当 ◆0chp.sx.ik ：2013/12/18(水) 14:42:39.95 ID:YFXypRHX0

>>822,823
レスが遅れてすみません。

携帯用index
module/varda.pl の159行目の
  $Page->Print("<a href=\"$path\">$i: $name($res)</a><br> \n");
という1行を以下のコードに書き換えてください
  my $onename = '';
  my $basePath = $Sys->Get('BBSPATH') . '/' . $Sys->Get('BBS');
  if (open(my $fh, '<', "$basePath/dat/$key.dat")) {
    $text = <$fh>;
    close($fh);
    $onename = (split(/<>/, $_, -1))[0];
    $onename =~ s/<[^>]+>//g;
    $onename = " ($onename)";
  }
  $Page->Print("<a href=\"$path\">$i: $name($res)</a>$onename<br> \n");

PC用indexは392-399行目あたりを同様に書き換えてください。
subbackは243行目あたりです。

>>717も含めてこのような処理は .htmlを生成するたび(書き込まれるたび)に
10個や数十個の .datを読み込むことになるので負荷には気をつけてください。