mp3-tags ändern (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl · MP3 ID3 Tag

2025-10-29 16:41:18
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
1 Benutzer online
1 Gast

[thread]17459[/thread]

submit to reddit

mp3-tags ändern

Tags: perl5 mkdir Ähnliche Threads

Leser: 24

Articles: hide open all | hide show old branches

Teilbaum:
mp3-tags ändern (12 Artikel) 2012-06-14 14:48

+13 replies
Gast timehandler

2012-06-12 18:09

habe jetzt den code erweitert damit ich die tags von der mp3 datei auch ändern kann, nur verstehe ich nicht richtig wie ich die neuen tags an die mp3 datei übergeben kann.

more (23.9kb)

als fehler erhalte ich

Can't call method "all" on an undefined value at mkdir.pl line 92,

modedit Editiert von pq: teilbaum
Last edited: 2012-06-12 18:14:48 +0200 (CEST)
- +2 replies
- Linuxer
  
  2012-06-12 18:28
  User since
  2006-01-27
  3891 Artikel
  HausmeisterIn
  Irgendwie scheint mir der gezeigte Code nicht zur Fehlermeldung zu passen.
  
  Der einzige Aufruf einer Methode all() steht im Code in Zeile 100, nicht in Zeile 92...
  
  Der Code der Zeile ergibt so gar keinen Sinn:
  
  Code (perl): (dl )
  
  my $id3v1->all($new_artist, $new_title, $new_album);
  
  Woher soll denn $id3v1 stammen? Oder willst Du diese Variable neu definieren (was das my andeutet).
  
  Wenn die Variable aber neu ist, ist sie nicht definiert und man kann darüber auch keine Methode aufrufen... Genau das sagt Dir die Fehlermeldung...
  
  Warum konzentrierst Du Dich nicht erstmal auf ein Problem, bevor Du Dir die nächste Baustelle aufmachst? Oder ist Dein bisheriges Problem gelöst?
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
  - Gast timehandler
    
    2012-06-12 19:24
    
    eig soll die variable $id3v1 die mp3 datei beinhalten und in die soll dann die neuen tags geschrieben werden.
    
    so habe ich das zumindest in cpan gelesen, aber so richtig verstanden habe ich das nicht. :/
    
    das andere problem habe ich erstmal zurück gestellt.
    Last edited: 2012-06-12 19:25:33 +0200 (CEST)
- +7 replies
- FIFO
  
  2012-06-12 23:25
  User since
  2005-06-01
  469 Artikel
  BenutzerIn
  Guest timehandler
  ... nur verstehe ich nicht richtig wie ich die neuen tags an die mp3 datei übergeben kann.
  
  Hi, schon mal ein paar Gedanken:
  
  Du wirfst da munter Tag-Versionen durcheinander, vielleicht schaust Du Dir mal mehr Infos zu ID3-Tags an, z.B. hier.
  Die autoinfo()-Methode verwendet primär ID3v2, falls möglich (aus der Doku):
  
  It will as default first try to find a ID3v2-tag to get this information. If this cannot be found it tries to find a ID3v1-tag, then to read an CDDB file, an .inf-file, and if these are not present either, it will use the filename
  
  Hier kannst Du schnell Inkonsistenzen erzeugen, wenn Du geänderte Tags als ID3v1 schreibst.
  
  MP3::Tag liefert als Methode zum Tag-Ändern die Methode update_tags():
  
  Code: (dl )
  
  $mp3->update_tags({year => 1866}); # Edit in-memory, and commit to file
  
  ich würde der change_tag()-Sub auch die Objektreferenz $mp3 als Parameter übergeben, das ist erheblich besser nachvollziehbar ...
  
  Bin jetzt echt zu müde, falls möglich schau ich morgen nochmal drüber,
  Gruß FIFO
  Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"
  - +6 replies
  - Gast timehandler
    
    2012-06-13 14:19
    danke für den tip mit update_tags()
    
    ich habe jetzt das in die sub change_tag eingefügt
    
    Code (perl): (dl )
    
    1 2 3 4
    
    # Update MP3 Tags $mp3->update_tags({artist => $new_artist,#übergabe der neuen Tags title => $new_title, album => $new_album});
    
    das funktioniert super
    
    nur habe ich jetzt das problem das der ordner der erstellt wird, als namen die alten tags hat. :/
    und das zwar die tags geändert werden von der mp3 datei,aber sie wird nicht umbenannt.
    
    dafür gibt es ja den code $mp3=rename($altername,$neuername); aber da passiert nichts
    Last edited: 2012-06-13 14:53:45 +0200 (CEST)
    - +5 replies
    - FIFO
      
      2012-06-13 17:09
      
      User since
      2005-06-01
      469 Artikel
      BenutzerIn
      
      Guest timehandler
      und das zwar die tags geändert werden von der mp3 datei,aber sie wird nicht umbenannt.
      
      dafür gibt es ja den code $mp3=rename($altername,$neuername); aber da passiert nichts
      
      Wo steht denn dieser Code? Hast Du Dir mal die mit MP3::Tag mitgelieferten Beispielskripte angesehen? audio_rename könnte doch in Deine Richtung gehen.
      
      Noch eine Anmerkung: Du übernimmst ungeprüft/-gefiltert Benutzereingaben als neue Tags, hier musst Du Dich zumindest mit dem Encoding befassen, insbesondere bei Windows (Ausgabe in der Konsole = cp437, Eingabe cp1252, ... denk z.B. mal an Umlaute), Evtl. solltest Du zu Anfang ein system("chcp 1252"); machen, dann sind Ein- und Ausgabe ANSI (Windows-Version von Latin1). Encoding ist bei ID3-Tags ein bekanntes Problem, vgl. auch die Modul-Doku, Abschnitt "Problems with ID3 format".
      
      So long, weiteres später ...
      Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"
      - +3 replies
      - Gast timehandler
        
        2012-06-13 17:38
        
        den code habe ich über google gefunden, umgenennen von dateien.
        
        aus audio_rename -csR -@p "@a/@l/@02n_@t" werde ich irgendwie auch nicht schlauer bzw verstehe da nicht, wo und wie man da die alte bzw neue bezeichnung angibt. :-/
        
        FIFO
        
        2012-06-13 18:46
        
        User since
        2005-06-01
        469 Artikel
        BenutzerIn
        
        Guest timehandler
        den code habe ich über google gefunden, umgenennen von dateien.
        
        Ok. Vielleicht versuchst Du zuviel auf einmal :) Wenn Du move() aus File::Copy benutzt, brauchst Du kein rename(). Schon garnicht sinnvoll ist es, den Rückgabewert von rename() in der Variable $mp3 abzulegen, die enthält ja Dein MP3::Tag-Objekt.
        
        Geh nochmal einen Schritt zurück.
        Möglicherweise musst Du die MP3-Datei (bzw. das $mp3-Objekt) erst ezplizit mit $mp3->close(); schließen, bevor Du Dateioperationen (move etc.) damit durchführen kannst (Locking durch MP3::Tag?).
        
        Versuche, den funktionierenden Teil vom nichtfunktionierenden zu trennen/isolieren. Schreib ein kurzes Skript, was nur und reproduzierbar die fehlerhafte Operation durchführt und teste es an einer möglichst einfachen mp3-Datei (ohne Leerzeichen im Namen usw.).
        Poste das fehlerhafte Miniskript mitsamt seinen Fehlermeldungen.
        Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"
        
        Linuxer
        
        2012-06-13 22:56
        
        User since
        2006-01-27
        3891 Artikel
        HausmeisterIn
        
        Guest timehandler
        aus audio_rename -csR -@p "@a/@l/@02n_@t" werde ich irgendwie auch nicht schlauer bzw verstehe da nicht, wo und wie man da die alte bzw neue bezeichnung angibt. :-/
        
        Wo ist denn das entliehen? Was soll das sein? Nach Perl(5)-Code sieht das IMHO nicht aus.
        meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
        Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
      - GUIfreund
        
        2012-06-14 10:43
        
        User since
        2011-08-08
        559 Artikel
        BenutzerIn
        
        2012-06-13T15:09:28 FIFO
        Evtl. solltest Du zu Anfang ein system("chcp 1252"); machen, dann sind Ein- und Ausgabe ANSI (Windows-Version von Latin1).
        
        Ich empfinde es als am bequemsten, das chcp 1252 bei der Erzeugung der DOS-Shell (durch Doppelklick auf ein verknüpftes Icon auf dem Desktop) gleich automatisch mit erledigen zu lassen. Dann brauche ich mich im Perlkode [Edit] fast immer nicht um das Encoding der Ein- und Ausgabe zu kümmern.
        Last edited: 2012-06-14 10:56:08 +0200 (CEST)
        Gruß
        GUIfreund
- +3 replies
- topeg
  
  2012-06-14 13:49
  
  User since
  2006-07-10
  2611 Artikel
  BenutzerIn
  
  Irgendwie durcheinander gekommen. Falscher thread
  Last edited: 2012-06-14 13:50:52 +0200 (CEST)
  - +2 replies
  - pq
    
    2012-06-14 13:53
    
    User since
    2003-08-04
    12209 Artikel
    Admin1
    
    hm? war doch richtig, du bezogst dich auf
    my $id3v1->all($new_artist, $new_title, $new_album);und hast das schon richtig angemerkt, was daran falsch war.
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    - topeg
      
      2012-06-14 14:48
      
      User since
      2006-07-10
      2611 Artikel
      BenutzerIn
      
      Stimmt, ich bin mit dem Abgespaltenen durcheinander gekommen.

View all threads created 2012-06-04 15:49.