是否有用于ID3元数据的Perl或Python库？

基本上,我有一堆音乐文件从我兄弟的iPod中悄悄地保留了他们的元数据,但是有一些绝对可怕的四个角色名字,iPod似乎喜欢将它们存放下来.我想我会写一个很好的,快速的脚本来按我的意愿重命名它们,但我很好奇任何用于读取ID3元数据的好库.我更喜欢Perl或Python.我对Perl感到很自在,因为我在工作中使用它,而Python我需要更多练习,这将使我的Python传道者朋友们感到高兴.

无论如何,缩短版本：你能为Python或Perl命名一个好的库/模块,这样我可以轻松地从一堆mp3中提取ID3元数据吗？

解决方法

MP3::Tag也很棒.同样,如果您正在寻找Perl模块,请首先访问search.cpan.org.

use MP3::Tag;

  $mp3 = MP3::Tag->new($filename);

  # get some information about the file in the easiest way
  ($title,$track,$artist,$album,$comment,$year,$genre) = $mp3->autoinfo();
  # Or:
  $comment = $mp3->comment();
  $dedicated_to
    = $mp3->select_id3v2_frame_by_descr('COMM(fre,fra,eng,#0)[dedicated to]');

  $mp3->title_set('New title');         # Edit in-memory copy
  $mp3->select_id3v2_frame_by_descr('TALB','New album name'); # Edit in memory
  $mp3->select_id3v2_frame_by_descr('RBUF',$n1,$n2,$n3);    # Edit in memory
  $mp3->update_tags(year => 1866);      # Edit in-memory,and commit to file
  $mp3->update_tags();                  # Commit to file

原文地址：https://www.jb51.cc/Perl/172928.html