Help for this page

Select Code to Download


  1. or download this
    use URI::Escape;
    my $message = uri_escape(join('', @message));
    
  2. or download this
    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]);