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

my $request = POST($url,
        action => 'Count',
          name => 'datafile',
  Content_Type => 'multipart/form-data',
       Content => [ 'file' => [ $ballot_file ]]
);

##</code><code>##

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

my $request = POST($url,
    Content_Type => 'multipart/form-data',
    Content      => [
        file   => [ $ballot_file ],
        action => 'Count',
        name   => 'datafile',
    ],
);

##</code><code>##

  POST 'http://www.perl.org/survey.cgi',
       Content_Type => 'form-data',
       Content      => [ name  => 'Gisle Aas',
                         email => 'gisle@aas.no',
                         gender => 'M',
                         born   => '1964',
                         init   => ["$ENV{HOME}/.profile"],
                       ]