(get_tags): http://us.xiph.org/ogg/vorbis/doc/v-comment.html says the

keys are supposed to be case insensitive.

diff --git a/flac2mp3 b/flac2mp3
index f497d6bbc6b94f1d8b3fd7859343d254746e55b3..6a496bf7aae3461d426b22d4e2d771e769718098 100755 (executable)
--- a/flac2mp3
+++ b/flac2mp3
@@ -107,18 +107,18 @@ sub get_tags {
 
         ($tag, $value) = split(/=/, $_, 2);
 
 
         ($tag, $value) = split(/=/, $_, 2);
 

-        if (/^ARTIST=/) {
+        if (/^ARTIST=/i) {

             $artist = $value;
             $artist = $value;

-        } elsif (/^ALBUM=/) {
+        } elsif (/^ALBUM=/i) {

             $album = $value;
             $album = $value;

-        } elsif (/^DATE=/) {
+        } elsif (/^DATE=/i) {

             $date = $value;
             $date = $value;

-        } elsif (/^ARTIST\[/) {
+        } elsif (/^ARTIST\[/i) {

             push(@$artists, $value);
 
         # Intentionally don't match the = on this one, to support the
         # TITLE[1] .. TITLE[n] tag style.
             push(@$artists, $value);
 
         # Intentionally don't match the = on this one, to support the
         # TITLE[1] .. TITLE[n] tag style.

-        } elsif (/^TITLE/) {
+        } elsif (/^TITLE/i) {

             push(@$titles, $value);
         }
     }
             push(@$titles, $value);
         }
     }