perl -d <your script>

##</code><code>##

use LWP::Debug qw(+);

# REST OF YOUR CODE