Проигрывание *.wma в Linux

Форум предназначен для новичков. В нем предполагается рассматривать вопросы, которые встают на первых этапах освоения Linux
Аватара пользователя
Geophics
Заглянувший
Сообщения: 37
Зарегистрирован: 27 янв 2004, 01:51
Откуда: Минск
Контактная информация:

Проигрывание *.wma в Linux

Сообщение Geophics »

Какой прогой можно производить сабж? Или можно настроить существующие плейеры?

Аватара пользователя
Llama
Неотъемлемая часть форума
Сообщения: 9749
Зарегистрирован: 06 фев 2002, 11:40
Откуда: Менск

Сообщение Llama »

mplayer умеет. но лутше не пользоваться закрытыми форматами. есть скрипт, который конвертирует wma в ogg.
Опыт растет прямо пропорционально выведенному из строя оборудованию

Аватара пользователя
Geophics
Заглянувший
Сообщения: 37
Зарегистрирован: 27 янв 2004, 01:51
Откуда: Минск
Контактная информация:

Сообщение Geophics »

Супер! И где же надыбать этот скрипт?
Tell me it was just a dream...

Аватара пользователя
kostaLom
Маньяк
Сообщения: 170
Зарегистрирован: 24 авг 2002, 14:14
Откуда: 9-й Отдел
Контактная информация:

Сообщение kostaLom »

Сомневаюсь, чтобы это был скрипт.

Аватара пользователя
Llama
Неотъемлемая часть форума
Сообщения: 9749
Зарегистрирован: 06 фев 2002, 11:40
Откуда: Менск

Сообщение Llama »

#!/usr/bin/perl

#You should just run this from the directory where the files
#you want to convert are located. But you can also optionally
#just specify the path here.
opendir (ENCDIR, "./");
@dirlist = grep {/\.wma$/} readdir (ENCDIR);
closedir ENCDIR;

#These are just used for specifying the names to use when encoding
#to ogg. You can change them to whatever you want.
$album = "The Eminem Show";
$artist = "Eminem";

foreach (@dirlist) {
# These next two lines are very specific to the filenames you're using.
# If you know a little bit of perl, you can modify them for your use.
# Otherwise, I'd suggest just doing it by hand.
$tracknum = substr($_,0,2);
$trackname = substr($_,3,-4);
print "Converting $_ to WAV...";
`mplayer -ao pcm -aofile encodeme.wav "$_" 2>/dev/null`;
print "done!\n";
print "Encoding to ogg:\n";
print " Number: $tracknum\n";
print " Track : $trackname\n";
`oggenc -a $artist -N $tracknum -t "$trackname" -l "$album" -n "\%a -
\%t.ogg" encodeme.wav`;
print "done!\n\n";
}

Для работы в системе должен быть mplayer и vorbis-tools
Опыт растет прямо пропорционально выведенному из строя оборудованию

Ответить