use WWW::Mechanize;
$url = '.........';
$mech = WWW::Mechanize->new();
$mech->get( $url );

$result = $mech->submit_form
(
        form_number => 0,
        fields      => 
	{
            context    => 'Hello world',
        }
);