pallfreeman;570028 Wrote:
>
> $album =~ s/\s*[\[\(]disk|disc|cd\s*\d*[\)\]\s*//i;
>
Code:
--------------------
$newalbum = '';
if ($album =~ m...@^(.*?)\s*/?[\(\[]?(cd|disk|disc)\s*\d+[\)\]...@i) {
$newalbum = $1;
}
--------------------
This strips the "CD n" stuff from 651 of my 2390 misses. YMMV.
--
pallfreeman
------------------------------------------------------------------------
pallfreeman's Profile: http://forums.slimdevices.com/member.php?userid=37667
View this thread: http://forums.slimdevices.com/showthread.php?t=80979
_______________________________________________
beta mailing list
[email protected]
http://lists.slimdevices.com/mailman/listinfo/beta
