Автор: ovartur
Дата сообщения: 08.01.2008 04:03
помогите пожалуйста
я выкачал библиотеку lib.rus.ec
на выходе получаю папку с архивами:
Abdulaev_Chingiz_Simvoly_raspada.zip
Abe'_Kobo_Chelovek-jaschik.zip
тк это fb2, то внутри есть тег <genre>...</genre>
подскажите как написать батник чтобы пролопатил папку с архивами и создал бы папку с заданым жанром(genre) точнее жанраМИ
...а в идеале - чтобы архивы еще разархивировались бы с наименованием из тегов...
(скопировал в помощь из настройки программки Booki - сам яничего не понимаааа..)
// Фамилия Имя - Название книги
// Фамилия1 Имя1, Фамилия2 Имя2 - Название книги
// Фамилия Имя - Название книги (Название серии #НомерВСерии)
$i = 1
while ($i <= $authorno) {
$str_t0 = author($i, "l")
$str_t1 = author($i, "f")
if ($str_t1 <> "") {
if ($str_t0 <> "") $str_t0 = $str_t0 + " "
$str_t0 = $str_t0 + $str_t1
}
if ($filename <> "") $filename = $filename + ", "
$filename = $filename + $str_t0
$i = $i + 1
}
if ($filename <> "") $filename = $filename + " - "
if ($seq <> "") {
$filename = $filename + "("
$filename = $filename + $seq
if ($seqnum <> "") {
$filename = $filename + " #"
$filename = $filename + $seqnum
}
$filename = $filename + ") "
}
$filename = $filename + $title
// заменить недопустимые символы в имени файла на "_"
$filename = repl($filename, "\\", "_")
$filename = repl($filename, "/", "_")
$filename = repl($filename, ":", "_")
$filename = repl($filename, "*", "_")
$filename = repl($filename, "?", "_")
$filename = repl($filename, "\"", "_")
$filename = repl($filename, "<", "_")
$filename = repl($filename, ">", "_")
$filename = repl($filename, "|", "_")
