メタデータ:: DB ::インデックス

Metadata :: DBおよびSUBパッケージで使用するための索引付けレコードを容易にします。
今すぐダウンロード

メタデータ:: DB ::インデックス ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Leo Charre
  • 出版社のWebサイト:
  • http://search.cpan.org/leocharre/

メタデータ:: DB ::インデックス タグ


メタデータ:: DB ::インデックス 説明

Metadata :: DBおよびサブパッケージで使用するための索引付けレコードを容易にします。 Metadata :: DB :: Indexerは、Metadata :: DBおよびサブパッケージで使用するための索引付けレコードを容易にするPerlモジュールです。これは、レコードのメタデータテーブルを完全に再作成することを目的としています。ファイルの索引付けに役立ちます。ファイル:: find ::ルールを使用してください。厳格な「参考」はありません。 * {メタデータ:: db :: indexer :: record_identifier_to_metadata} = get_mp3_meta; My $ FINDER = file :: find :: rule-> file() - > name(qr / 。mp3 $ / i);私の@music_files = $ finder->( '/ home / mscelles');私の$ absdb = '/home/myself/music.db'; My $ dbh = dbi-> connect( "dbi:sqlite:dbname = $ absdb"、 ""、 ""); My $ Indexer = Metadata :: DB :: Indexer({DBH => $ DBH}); $ Indexer-> Records_To_Index( @ music_files); $ Indexer-> Run; sub get_mp3_meta {My $ Record_Identifier = Shift; My $ abs_path = $ record_identifier; My $ META = MY_SUB_THAT_TURNS_MP3S_TO_HASHREF_META($ ABS_PATH); $メタまたは返品。 #これは失敗を登録し、$ METAを返します。 My $ TOTAL = $ INDEXED-> RECORDS_TO_INDEX_COUNT; My $ INDEXED = $ INSEXER - > RECORDS_INDEXED_COUNT; STDERRを印刷し、$ Total Recordsの索引付けされた$ INDEXED N ";要件: ・Perl


メタデータ:: DB ::インデックス 関連ソフトウェア