use URI::Escape;
my $message = uri_escape(join('', @message));

##</code><code>##

use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
my $url = 'http://xxx.xxxx.xxx/somewhat/bla/bboard/newthread.php';
my $ua = LWP::UserAgent->new;
my $res = $ua->request(POST $url, [action => 'send', boardid => 4]);