When you use HTTP::Request::Common's POST routine, it creates an HTTP::Request object that has all it's attributes set to the most common values. For a large majority of tasks you will not need to set the values to anything different, and if you do, it is a great point at which to start from.

Now, HTTP::Message is the parent to HTTP::Request, and passes down it's headers method to it (along with all it's other methods) which will let you get at this request's HTTP::Headers object.

Here is your example, modified to show the use of this method:

#!/usr/bin/perl -w

use strict;
use HTTP::Request::Common qw(POST);

#build a pre-fab HTTP::Request object
my $request = POST 'http://gino/ciccio.cgi', [
  sessionid   => 'something',
  mittente    => 'something',
  prefix      => 'number',
  numtel      => 'number',
  messagetext => 'message',
  flash       => 0,
  Submit      => ' Invia ',
];

#get this request's HTTP::Headers object
my $headers = $request->headers;

#you can call any method specified in HTTP::Headers' perldoc

print $headers->as_string;
[download]