LINUX « E-Pillole

Dopo essermi finalmente deciso ad utilizzare mp32ogg per convertire tutti i miei .mp3 in .ogg ho quasi subito riscontrato un problemino davvero banale e di facile risoluzione...anche per chi, come me, di perl ne conosce solo l'esistenza :)

In sintesi, a causa di questo "pezzo" di codice:

sub findfunc() {
	$file = $_;
	($name,$dir,$ext) = fileparse($file,'\.mp\d');
	if((/\.mp\d/,$ext) && -f $file) {
		&checkfile($file);
	}
}

vengono intercettati solo ed esclusivamente i files con estensione .mp3 e di conseguenza ignorati eventuali .mP3 / .Mp3 / .MP3

Quello che manca, e che andremo a fixare, è quindi una regular expression all'interno della routine fileparse() che traformi mp32ogg in uno script completamente case-insensitive.

Vediamo come...

Molto semplicemente, basterà applicare al file /usr/bin/mp32ogg questa "patch":

--- mp32ogg	2006-12-08 09:45:30.000000000 +0100
+++ mp32ogg	2007-08-29 01:11:33.000000000 +0200
@@ -148,8 +148,8 @@
 
 sub findfunc() {
 	$file = $_;
-	($name,$dir,$ext) = fileparse($file,'\.mp\d');
-	if((/\.mp\d/,$ext) && -f $file) {
+	($name,$dir,$ext) = fileparse($file,'\.[mM][pP]\d');
+	if((/\.[mM][pP]\d/,$ext) && -f $file) {
 		&checkfile($file);
 	}
 }
@@ -217,7 +217,7 @@
 			warn "not enough ID3 info to rename, reverting to old filename.\n";
 		}
 
-		($filename,$dirname,$ext) = fileparse($mp3file,'\.mp\d');
+		($filename,$dirname,$ext) = fileparse($mp3file,'\.[mM][pP]\d');
 	}
 	else {
 		$filename =~ s/\%a/$info->{ARTIST}/g;

Supponendo quindi che il file contenente la "patch" si chiami fix_mp32ogg.diff e risieda sul vostro Desktop, sarà sufficiente digitare:

sudo patch /usr/bin/mp32ogg ~/Desktop/fix_mp32ogg.diff

e niente più problemi con le estensioni dei nostri mp3 da convertire in ogg!!

Ovviamente, il "bug" è stato già segnalato sia in Debian che in Ubuntu, e a breve riceveremo quasi sicuramente un bell'aggiornamento che andrà a rimpiazzare la nostra modifica rudimentale :)

Nel frattempo, accontentiamoci di una patch fatta in casa...