Notices by 樺太庁長官 (karafutoadmin@misskey.kindworld.one), page 6

まずsearch.cgiが全文検索固定で検索結果をそのまま画面にズラズラがあかんねんな・・・
検索結果とレス表示は分離させてかつ結果ページを分割せにゃ

ためしに検索のコードをchatGPT3.5になげて高速化させたところ動作確認できたんでUP

sub Search { my $this = shift; my ($word) = @_; my $bbs = $this->{'SYS'}->Get('BBS'); my $key = $this->{'SYS'}->Get('KEY'); my $Path = $this->{'SYS'}->Get('BBSPATH') . "/$bbs/dat/$key.dat"; my $DAT = $this->{'DAT'}; if ($DAT->Load($this->{'SYS'}, $Path, 1)) { my $pResultSet = $this->{'RESULTSET'}; my $type = $this->{'TYPE'} || 0x7; # 検索パターンをループの外でコンパイルする my @patterns; if ($type & 0x1) { push @patterns, quotemeta($word); } if ($type & 0x2) { push @patterns, quotemeta($word); } if ($type & 0x4) { push @patterns, quotemeta($word); } my $pattern = join('|', @patterns); my $re = qr/$pattern/; # すべてのレス数でループ for (my $i = 0; $i < $DAT->Size(); $i++) { my $bFind = 0; my $pDat = $DAT->Get($i); my $data = $$pDat; my @elem = split(//, $data, -1); # 正規表現を使用せずに検索を実行する if ($type & 0x1) { if (index($elem[0], $word) != -1) { $elem[0] =~ s/(\Q$word\E)/$1/g; $bFind = 1; } } if ($type & 0x2) { if (index($elem[3], $word) != -1) { $elem[3] =~ s/(\Q$word\E)/$1/g; $bFind = 1; } } if ($type & 0x4) { if (index($elem[2], $word) != -1) { $elem[2] =~ s/(\Q$word\E)/$1/g; $bFind = 1; } } if ($bFind) { my $SetStr = "$bbs$key" . ($i + 1) . ''; $SetStr .= join('', @elem); push @$pResultSet, $SetStr; } } } $DAT->Close(); }こんな感じ

@PYU224 UIデザインよろしくお願いいたします🙂

本文検索も本文検索でUIが終わってるから、あのへんはPHP化で大々的に手入れします

RE: https://misskey.kindworld.one/notes/9hrp5a5mzn

ぜろちゃんねるプラスには・・・・・・スレタイ検索がない。

尊師政党結成で政界進出てマジなのですか？

ちなみに樺太掲示板は完全無料で動いてました

RE: https://misskey.kindworld.one/notes/9h4qnngyx5

あとPHPはPerl見たくモジュールズラズラ入れる必要がないってのもいいね

やっすい共用鯖でもPHPは大体対応してんだけど、Perlはマジでない

すみません余計な箇所があったので修正しました
https://github.com/PrefKarafuto/New_0ch_Plus/releases/tag/v0.8.4

ディスカッションをサブスクライブしていただくと、書き込まれた際に通知が飛ぶようになります

PHP読める方求む！

RE: https://misskey.kindworld.one/notes/9gxnnf5c7l

ようやくPHPへの書き換えに目処がたった
chatGPTがなかったら永遠に無理だったわｗ

レポジトリに新しいディスカッションを作成しました
PHPへの翻訳にかんしてはこちらで話し合いたいと思います
https://github.com/PrefKarafuto/New_0ch_Plus/discussions/42

@PYU224 当職が考えているのは、私が考えているのはモジュール単位もしくはサブルーチン単位で0ｃｈ+のソースコードを全面的にchatGPTに投げて翻訳、その後人力(+chatGPT)でコードを手直ししていくという方法です
PHPは8.2を想定しております

chatGPTを使ったスクリプトのPerl to PHP書き換えを行いたい！
何卒ご助力を！
連絡お待ちしております！
私だけだと（chatGPTのプラン的にも）キツイ😅

RE: https://misskey.kindworld.one/notes/9gurrp5w7n

この中にー！
どなたかー！
PHPが読める方いらっしゃいませんかー！（切望）

RE: https://misskey.kindworld.one/notes/9gurp4yp7g

試しにchatGPTを使ってぜろちゃんねるプラスのスクリプトの一部をPerlからPHPに書き換えてみたんだが、PHPは全然わからないんであってるかどうかすら不明

ちょくちょく0ｃｈ+を修正

じきにver0.8.4がリリースされます