Free sort mp3 files software for linux

Mp3Fixer is an amaroK Script for repairing various defects in MP3 files, for instance files which display a bogus track length in your audio player.

For example, if you have a track that you know is really two minutes long, but amaroK shows its two hours something, then this script is for you.

Mp3Fixer calculates the real track length and adds the missing XING header to the file, and it also repairs broken MPEG headers.

MP3::Tag::File is a Perl module for reading / writing files.

SYNOPSIS

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

($title, $artist, $no, $album, $year) = $mp3->parse_filename();
see MP3::Tag

MP3::Tag::File is designed to be called from the MP3::Tag module.
It offers possibilities to read/write data from files via read(), write(), truncate(), seek(), tell(), open(), close(); one can find the filename via the filename() method.
parse_filename()

($title, $artist, $no, $album, $year) = $mp3->parse_filename($what, $filename);

parse_filename() tries to extract information about artist, title, track number, album and year from the filename. (For backward compatibility it may be also called by deprecated name read_filename().)

This is likely to fail for a lot of filenames, especially the album will be often wrongly guessed, as the name of the parent directory is taken as album name.

$what and $filename are optional. $what maybe title, track, artist, album or year. If $what is defined parse_filename() will return only this element.

If $filename is defined this filename will be used and not the real filename which was set by MP3::Tag with MP3::Tag-new($filename)>. Otherwise the actual filename is used (subject to configuration variable decode_encoding_filename).

Following formats will be hopefully recognized:

- album name/artist name - song name.mp3
- album_name/artist_name-song_name.mp3
- album.name/artist.name_song.name.mp3
- album name/(artist name) song name.mp3
- album name/01. artist name - song name.mp3
- album name/artist name - 01 - song.name.mp3

If artist or title end in (NUMBER) with 4-digit NUMBER, it is considered the year.
title()

$title = $mp3->title($filename);

Returns the title, guessed from the filename. See also parse_filename(). (For backward compatibility, can be called by deprecated name song().)

$filename is optional and will be used instead of the real filename if defined.

artist()

$artist = $mp3->artist($filename);

Returns the artist name, guessed from the filename. See also parse_filename()

$filename is optional and will be used instead of the real filename if defined.

track()

$track = $mp3->track($filename);

Returns the track number, guessed from the filename. See also parse_filename()

$filename is optional and will be used instead of the real filename if defined.

year()

$year = $mp3->year($filename);

Returns the year, guessed from the filename. See also parse_filename()

$filename is optional and will be used instead of the real filename if defined.

album()

$album = $mp3->album($filename);

Returns the album name, guessed from the filename. See also parse_filename() The album name is guessed from the parent directory, so it is very likely to fail.

$filename is optional and will be used instead of the real filename if defined.
comment()

$comment = $mp3->comment($filename); # Always undef

genre()

$genre = $mp3->genre($filename); # Always undef

MP3::Icecast is a Perl module to generate Icecast streams, as well as M3U and PLSv2 playlists.

SYNOPSIS

use MP3::Icecast;
use MP3::Info;
use IO::Socket;


my $listen_socket = IO::Socket::INET->new(
LocalPort => 8000, #standard Icecast port
Listen => 20,
Proto => tcp,
Reuse => 1,
Timeout => 3600);

#create an instance to find all files below /usr/local/mp3
my $finder = MP3::Icecast->new();
$finder->recursive(1);
$finder->add_directory(/usr/local/mp3);
my @files = $finder->files;

#accept TCP 8000 connections
while(1){
next unless my $connection = $listen_socket->accept;

defined(my $child = fork()) or die "Cant fork: $!";
if($child == 0){
$listen_socket->close;

my $icy = MP3::Icecast->new;

#stream files that have an ID3 genre tag of "jazz"
while(@files){
my $file = shift @files;
my $info = new MP3::Info $file;
next unless $info;
next unless $info->genre =~ /jazz/i;
$icy->stream($file,0,$connection);
}
exit 0;
}

#a contrived example to demonstrate that MP3::Icecast
#can generate M3U and PLSv2 media playlists.
print STDERR $icy->m3u, "n";
print STDERR $icy->pls, "n";

$connection->close;
}

ABSTRACT

MP3::Icecast supports streaming Icecast protocol over socket or other filehandle (including STDIN). This is useful for writing a streaming media server.
MP3::Icecast also includes support for generating M3U and PLSv2 playlist files. These are common formats supported by most modern media players, including XMMS, Windows Media Player 9, and Winamp.

Audio::TagLib::MPEG::File is an MPEG file class with some useful methods specific to MPEG.

SYNOPSIS

use Audio::TagLib::MPEG::File;

my $i = Audio::TagLib::MPEG::File->new("sample file.mp3");
print $i->tag()->artist()->toCString(), "n"; # got artist

This implements the generic Audio::TagLib::File API and additionally provides access to properties that are distinct to MPEG files, notably access to the different ID3 tags.

AnyData::Format::Mp3 is a tied hash and DBI access to Mp3 files.

SYNOPSIS

use AnyData;
my $playlist = adTie( Passwd, [c:/My Music/] );
while (my $song = each %$playlist){
print $song->{artist} if $song->{genre} eq Reggae
}

OR

use DBI
my $dbh = DBI->connect(dbi:AnyData:);
$dbh->func(playlist,Mp3,[c:/My Music],ad_catalog);
my $playlist = $dbh->selectall_arrayref( qq{
SELECT artist, title FROM playlist WHERE genre = Reggae
});
# ... other DBI/SQL operations

This module provides a tied hash interface and a DBI/SQL interface to MP files. It creates an in-memory database or hash from the Mp3 files themselves without actually creating a separate database file. This means that the database is automatically updated just by moving files in or out of the directories.
Many mp3 (mpeg three) music files contain a header describing the song name, artist, and other information about the music.

Simply choose Mp3 as the format and give a reference to an array of directories containing mp3 files. Each file in those directories will become a record containing the fields:

song
artist
album
year
genre
filename
filesize

This module is a submodule of the AnyData.pm and DBD::AnyData.pm modules. Refer to their documentation for further details.

FLV::ToMP3 can convert audio from a FLV file into an MP3 file.

SYNOPSIS

use FLV::ToMP3;
my $converter = FLV::ToMP3->new();
$converter->parse_flv($flv_filename);
$converter->save($mp3_filename);

See also flv2mp3.

Extracts audio data from an FLV file and constructs an MP3 file. See the flv2mp3 command-line program for a nice interface and a detailed list of caveats and limitations.