Select Code to Download

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

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