NET :: FTP :: Common. NET :: FTPの一般的な使用法を簡素化
今すぐダウンロード

NET :: FTP :: Common. ランキングとまとめ

NET :: FTP :: Common. タグ

Perlモジュール パール 一般

NET :: FTP :: Common. 説明

Net :: FTPの一般的な使用法を簡素化します Net :: FTP :: Commonは、Net :: FTPの共通の使用法を1行、引数のない事件の問題にすることを目的としたPerlモジュールです。つまり、Net :: FTPを使用した100％のプログラミングがあります。 Net :: FTP :: Commonでは、95％の設定と5％のプログラミングがあります。1行の事件になる方法は、ログインの一般的な前段階（バイナリ/ ASCII）があることです。あなたのために取り扱われます。それが使用される方法は、非議論のある事件を、建設時に構成されたハッシュから物を引っ張ることです。引数を任意のAPI関数に提供する必要がありますが、これらの変更はオブジェクトの状態のハッシュに適用され、それらを必要とするかもしれない将来呼び出されたAPI関数によって使用されます。このモジュールの未だが簡単でステレオタイプであることを目的としています。使用される一般的なステップは次のとおりです。 * Net :: FTP :: Common API関数を使用する最初にログインする必要がないことを確認してください。すべてのAPI関数は自動的にログインして、設定または指定されたディレクトリに変更します。ただし、FTPサイトで何か他のものをしようとする前に、実際にログインできるかどうかを確認することがあります。これはlogin（）APIメソッドを必要とする唯一の時期です。私たちの％common_cfg =（最初の2つのオプションが存在しない場合、ログイン＃user => 'anonymous'、pass => 'tbone@cpan.org'、##その他のオプション＃localfile => 'delete.zip'＃$ EZ-> Get Host => 'ftp.fcc.gov'の何かを設定します.ftp.microsoft.comデフォルトlocaldir => '/ tmp'、remotedir => '/' ＃リモートマシン上の自動CDは、Remotedir Type => 'a'＃上書きi（バイナリ）タイプのデフォルトです）。 ＃注意してください！ 1つのコンストラクタargが参照によって渡され、その他の値によって渡されます。これは矛盾していますが、それでも良いことです。 ＃ 私を信じてください！私はこれについて考えました。そして、私はそれの理由があります。 $ EZ = NET :: FTP :: Common-> New（％COMMON_CFG、％NETFTP_CONFIG）; ＃私たちはマシンにログインできますか？ ＃注：＃Net :: FTP :: Common API関数を呼び出す前に最初にログインする必要はありません。 ＃この機能は、マシンが起動しているかどうかを確認するためのものです。 ＃最初に利用可能なFTPサイトをスキャンするFTPスクリプトをアップロードに使用する場合に役立つので、APIの一部として公開されています。この関数の正確な＃コールアンドリターンセマンティクスは記述され、以下に正当化されています。 $ EZ->ログインまたは死ぬ "Login：$ @"; ＃リモートディレクトリのリストを取得@Listing = $ EZ-> LS。 ＃デフォルトディレクトリ@Listing = $ EZ-> LS（Remotedir => '/ PUB / RFCS'）を変更しましょう。 ＃いくつかのhostsのデフォルトのDIRをリストしましょう@host_listings = map {$ EZ-> LS（host => $ _）} @HOST_LIST＃いくつかのディレクトリのリストを取得します@ dir_listings = map {$ EZ-> LS（Remotedir = > $ _）} @ dir_list; ＃詳細なディレクトリリストを取得しましょう...（Kevinさんのありがとう！）％listing = $ EZ-> DIR; ＃注これはアレイの戻り値ではなくハッシュです。 ###代表出力「テスト」=> {'where' => 'root'、 '月' => 'Jan'、 'LinkTarget' => undef、 'iノード' => '1'、 'size' => '6'、 'Group' => 'root'、 'yeamortime' => '1999'、 'Day' => '27'、 'perm' => '-rw-r - r-'}} RANC '=> {' anner '=>' root '、'月 '=>' Oct '、' LinkTarget '=> undef、' inode '=>' 2 '、' size '=>' 4096 '、'グループ'=>' root '、' yeamortime '=> '00：42'、 'day' => '31'、 'perm' => 'drwxr-xr-x'}＃リモートマシンからファイルを取得$ EZ - > get（remotefile => 'codex.txt'、localfile => '/tmp/crypto.txt'）; #ir：$ ez-> get（remotefile => 'codex.txt'、localdir => '/ tmp'）を指定します。 ＃注意事項：以前のコールセットローカルファイルは、まだオブジェクトストアの一部です。言い換えれば、この例では＃ダウンロードしたファイルを/tmp/tmp/crypto.txtに保存するには、＃を試してみてください。 ＃$ ez-> get（remotefile => 'codex.txt'、localdir => '/ tmp'、localfile => ''）; ＃ファイルをリモートマシンに送信する（* DONT * USE PUT！）$ EZ-> SEND（RemoteFile => 'Codex.txt'）; #txt / txt / grep（grep => qr / * txt /）。注※リモートマシン上のファイルのテスト（EQを使用）$ EZ->が存在します（RemoteFile => '必須ファイル.txt'）。 ＃注意事項これは手動で電話をかけています。 ＃すべての出力をStderrに書き込んだすべての出力を取得して、LogFile My $ EZ = Net :: FTP :: Common-> New（{G、Stderr => $ LOGFILE}、％NETFTP_CFG）;要件： ・Perl

NET :: FTP :: Common. 関連ソフトウェア