| Metadados :: db :: indexador Facilita registros de indexação para uso com metadados :: DB e sub. |
Baixe Agora |
Metadados :: db :: indexador Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- Leo Charre
- Site do editor:
- http://search.cpan.org/~leocharre/
Metadados :: db :: indexador Tag
Metadados :: db :: indexador Descrição
Facilita registros de indexação para uso com metadados :: DB e subcorrespondentes Metadados :: DB :: O indexador é um módulo Perl que facilita os registros de indexação para uso com metadados :: DB e subscritos. Isso destina-se a recriar completamente uma mesa de metadados para registros. Útil para arquivos de indexação, ou qualquer tipo de registro que possa ser timely.synopsis use metadados :: db :: indexador; usar arquivo :: encontrar :: regra; Não estrito 'refs'; * {Metadados :: db :: indexer :: gravado_identifier_to_metadata} = \ get_mp3_meta; Meu $ Finder = Arquivo :: Localizar :: Regra-> Arquivo () -> Nome (QR / \. MP3 $ / I); my @music_files = $ finder-> em ('/ casa / eu'); meu $ ABSDB = '/home/myself/music.db'; Meu $ DBH = DBI-> CONNECT ("DBI: SQLITE: DBNAME = $ ABSDB", "", ""); Meu $ Indexer = Metadata :: DB :: indexador ({dbh => $ dbh}); $ indexer-> Records_to_Index (\ @ music_files); $ indexer-> correr; Sub get_mp3_meta {My $ Record_Identifier = Shift; meu $ ABS_PATH = $ record_identifier; meu $ meta = my_sub_that_turns_mp3s_to_hashref_meta ($ ABS_PATH); $ meta ou retorno; # Isso registra uma falha e continua retorna $ meta; } Meu $ Total = $ indexed-> Records_to_index_count; Meu $ indexado = $ indexer-> Records_Indexed_count; Imprimir Stderr "Concluído, indexado $ indexado de registros totais $. \ n"; Requisitos: · Perl.
Metadados :: db :: indexador Software Relacionado