Select Code to Download

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

#!/usr/bin/perl -w

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