Arrrrgggh! How can I debug a perl script? I have a script which used to post data to another server, retrieve info and continue on it's merry Perl ways. Within the past week, when the script runs the Post, nothing happens. The script starts, tries to connect, I suppose, then I get a CGI TimeOut error. I have narrowed it down to when it performs the Post. Per my webhoster, nothing has changed and they even rebooted the server.
Here is a portion of the code:
my $useragent = LWP::UserAgent->new( protocols_allowed => ["htt
+ps"] );
my $request = POST( "https://secure.mydomain.com/script.dll", $
+request_values );
my $response = $useragent->request( $request );
my @responses = split( /$request_values->{x_delim_char}/, $resp
+onse->content );
Like I had started, it was working great, up to about a week agin. I did nothing. It just started timing out.
Any ideas on how this can be debugged?
2006-02-12 Retitled by planetscape, as per Monastery guidelines
Original title: 'Debugging Perl'