NET :: FreeDB2

Net :: FreeDB2は、FreeDB Generic Connectionクラスを持つPerlモジュールです。
今すぐダウンロード

NET :: FreeDB2 ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Vincenzo Zocca
  • 出版社のWebサイト:
  • http://search.cpan.org/zoccav/HH-Unispool-Config-0.3/lib/HH/Unispool/Config/File/Token/Unnumbered/Bcs.pm

NET :: FreeDB2 タグ


NET :: FreeDB2 説明

Net :: FreeDB2は、FreeDB Generic Connectionクラスを持つPerlモジュールです。 Net :: FreeDB2は、FreeDB Generic Connection Classを持つPerlモジュールです.synopsis＃QuickおよびDirty CDリッパーは厳密です。 ＃デバイス名を使用するgetopt :: stdを使用します。 $ :: opt_d = ''; getopts（ 'd：'）;私の$ dev = $ :: opt_d || '/ dev / cdrom'; ＃:: freedb2 :: connectionを使用してくださいNet :: FreeDB2を使用してください。 My $ CONN = NET :: FREEDB2->接続（{client_name => 'quickrip' '、client_version =>' 1.0 '、}）; ＃$ devのCD＃の情報を含むNet :: FreeDB2 :: Entryオブジェクトを作成します。 My $ ENTRY = NET :: FREEDB2 :: entry-> new（{dev => $ dev}）; ＃reeadb / cddbデータベースMy $ RES = $ CONN-> QUERY（$エントリ）。 $ res-> hasError（）DIE（ 'OOPS、クランオのクランジアーブ' '）。 #matchesをチェックする（！スカラ（$ res-> getMatches（）））{warn（ 'warn（' matches founts 'no'）。終了（0）; ＃最初の一致My $ match =（$ res-> getMatches（））; #My $ RES = $ CONN->読み取り（$ match）に一致を読んでください。 $ res-> hasError（）DIE（ 'OOPS、Reading FreeDB' '）。 My $ ENTRY = $ RES-> getEntry（）; #CDParanoiaコマンドを作成するには、トラックをリッピングするMy $ TRACKS =スカラー（$ ENTRY-> GETFRAMEOFFSET（））;私の@ cmd = QW（CDParanoia）;プッシュ（@ cmd、 '-d'、$ dev）;プッシュ（@ cmd、 '-b'）。のために（私の$ i = 1; $ i getttitlen（$ i）; $ title = s / s; my @ cmd =（@ cmd、$ i）;＃実行コマンド印刷stderr "@ cmdn";システム（@ cmd）; DIE（ 'OOPS、コマンドに失敗しました'）if（$？>> 8）;＃;＃;＃;＃;＃;＃;＃;＃;＃;＃;＃;※出力ファイルの変更マイ$ SRC = SPRINTF（ "track d.cdda.wav"、$ i）; My $ dest = sprintf（ "d-％s.wav"、$ i、$ title）;印刷STDERR "MV $ SRC $ destn";;; Net :: FreeDB2は別のfreedb / cddbです。 Accessクラスの階層。基本は他のfreeDB / CDDB Perlモジュールと似ています。・Perlの要件： ・Perl


NET :: FreeDB2 関連ソフトウェア

私たちに関しては