MP3::Tag->config(write_v24 => 1);

##</code><code>##

#!/usr/bin/perl
use strict;
use warnings;
use MP3::Tag;
MP3::Tag->config(write_v24 => 1);

$mp3->title_set('new title');
$mp3->update_tags();
$mp3 = MP3::Tag->new($file);
($title, $track, $artist, $album, $comment, $year, $genre) = $mp3->autoinfo();
print("$title, $track, $artist, $album, $comment, $year, $genre\n");