Select Code to Download

($url->query_form(
                 artist => $pm_user,
                 albumcode => $pm_password);

#!/usr/bin/perl -w use strict; 
use LWP::UserAgent;
...

die "Error adding to nodelet $WWWResult->code $WWWResult->message" if(
+!$WWWResult->is_success);