$string=~ /\s*([^.|]+)\.mp3/; 
print "$1\n";