Perl Hangs On New Machine

[redfieldp]

Hello, I have a simple Perl script that scrapes some data from a web page, and then parses and writes it to a Mongo database. The script has been running fine on an Ubuntu 10.04 32 bit machine with Perl 5.10.1 However, I am now trying to run it on a Ubuntu 12.04 64 bit machine with Perl 5.14.2, and the script hangs. Specifically, when I create (not send) a post request. I put a print before and after the request, and the second print never happens. Any thoughts on why this might be occurring? The POST creation is below with the relevant websites removed.

        my $req = (POST 'https://www.myurlgoeshere.com',
        ["request" => "top",
        "language" => "en",
        "country" => "us",
        "month" => $currentMonth,
        "day" => $currentDay,
        "departure" => $depart,
        "arrival" => $arrive,
        "seat" => "1",
        "fromTop" => "on",
        "next.x" => "39",
        "next.y" =>"10"]);

[MidLifeXis]

Are you missing parts of your code above? Specifically, where is POST defined?

[redfieldp]

POST is defined earlier in the file, as follows:

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

There is other content in the file (it's a sizeable script), but using print, I've determined this is where it hangs. Keep in mind that, as I mentioned, the same script runs fine on another box. Any thoughts would be much appreciated!

[Anonymous Monk]

Doesn't happen :) Although you could use perl -d:Trace prog.pl ...