$artist_link->url() =~ /(\d{9})/;
print $pro_list $1, "\n";