是否有用于ID3元数据的Perl或Python库？[关闭]

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