#!/usr/bin/perl -s BEGIN { unshift @INC,".","./Net"; } use Socket; use Net::SSLeay qw(get_https make_form post_https); $Net::SSLeay::ssl_version = 3;