DROP FUNCTION IF EXISTS FIND_CATEGORY; DELIMITER // CREATE FUNCTION FIND_CATEGORY (category_title VARCHAR(32)) RETURNS INT BEGIN DECLARE HAS_TITLE_ID INT DEFAULT 0; SELECT `id` INTO HAS_TITLE_ID FROM `bbs_category` WHERE `title` = category…

#!/usr/bin/env perl # 日本語 use strict; use warnings; use LWP::UserAgent; use HTTP::Message; use utf8; my $board_list_url = 'http://www.example.com/'; my $ua = LWP::UserAgent->new; my $can_accept = HTTP::Message::decodable; my $response =…