perl и директории!

[2K WebStudio]

Помогите, пожайлуста!
Я знаю, что перл умеет сканировать директории, но как этот сделать не знаю!
Мне нужно следующее:
у меня есть корневая директория, в которой лежит несколько папок, внутри которых лежат mp3 файлы. Так вот мне надо автоматически сгенирировать xml файл со следующим содержанием:
<Король_и_шут>
<music spass="Sounds/Король и Шут" tpass="Texts/Король и Шут">
<albums itslength="9">
<album1 np="1996 - Камнем по голове" itslength="21">
<song1 np="01 - Смельчак и ветер"/>
<song2 np="02 - Проказник скоморох"/>
<song3 np="03 - Верная жена"/>
<song4 np="04 - Садовник"/>
<song5 np="05 - Блуждают тени"/>
<song6 np="06 - Внезапная голова"/>
<song7 np="07 - Шар голубой"/>
<song8 np="08 - Злодей и шапка"/>
<song9 np="09 - От женщин кругом голова"/>
<song10 np="10 - Рыбак"/>
<song11 np="11 - Мотоцикл"/>
<song12 np="12 - Холодное тело"/>
<song13 np="13 - Дурак и молния"/>
<song14 np="14 - Леший обиделся"/>
<song15 np="15 - Два вора и монета"/>
<song16 np="16 - Любовь и пропеллер"/>
<song17 np="17 - Камнем по голове"/>
<song18 np="18 - С тех пор как он ушел"/>
<song19 np="19 - В доме суета"/>
<song20 np="20 - Лесные разбойники"/>
<song21 np="21 - Мария"/>
</album1>
<album2 np="1996 - Король и Шут" itslength="17">
<song1 np="01 - Король и Шут"/>
<song2 np="02 - Два друга и разбойники"/>
<song3 np="03 - Сапоги мертвеца"/>
<song4 np="04 - Охотник"/>
<song5 np="05 - Паника в селе"/>
<song6 np="06 - Истинный убийца"/>
<song7 np="07 - Лесник"/>
<song8 np="08 - Помоги мне!"/>
<song9 np="09 - История о мертвой женщине"/>
<song10 np="10 - Кукольный театр"/>
<song11 np="11 - Валет и Дама"/>
<song12 np="12 - Веселые тролли"/>
<song13 np="13 - Он не знает, что такое жить!"/>
<song14 np="14 - Отец и Маски"/>
<song15 np="15 - Сказка про дракона"/>
<song16 np="16 - Инструмент"/>
<song17 np="17 - Собрание"/>
</album2>
</albums>
</music>
</Король_и_шут>

HELP!!!

[Crazy]

Вопросы, начинающиеся со "мне нужно" имеют ответы, начинающиемя с "$50". Другие вопросы у тебя есть?

[2K WebStudio]

Чувак!
Ты что, хочешь сказать, что вне зависимости от формулирвки этот вопрос стоит бабок???
Если я по=другому скажу, то всё будет чики-пики?
Или надо самому учить?
Если ты знаешь как это сделать, то хотя бы скажи, как долго этому учиться!!!

[Crazy]

Оригинал написал(а) 2K WebStudio
Ты что, хочешь сказать, что вне зависимости от формулирвки этот вопрос стоит бабок???

Перечитывай мое предыдущее сообщение, пока не постигнешь его смысл.

Если я по=другому скажу, то всё будет чики-пики?

О! Уже признаки просветления!