my $ws = WWW::Search->new('Coveralia::Albums');
$self->status(1, "Searching coveralia for the album $album");
$ws->native_query(WWW::Search::escape_query($album));
while (my $res = $ws->next_result) {
$self->status(1, 'Found album ' . $res->title . ' by ' . $res->artist);
my $ws = WWW::Search->new('Coveralia::Albums');
$self->status(1, "Searching coveralia for the album $album");
$ws->native_query(WWW::Search::escape_query($album));
while (my $res = $ws->next_result) {
$self->status(1, 'Found album ' . $res->title . ' by ' . $res->artist);