| #!/usr/local/bin/perl |
各プロバイダで定められたPerlへのパスを指定します。
|
| $maxbyte = 1024 * 100; |
一度にサーバーに転送するファイルサイズを指定します。
この例では、１００ｋｂの転送が可能です。
|
| $updir1 = '../../img/'; |
サーバー側の、アップロードデータを保管するディレクトリを指定します。
|
| $updir2 = '../img/'; |
このスクリプトはアップロードした結果、転送先を表示しますが、
その表示内容が、実際の転送先と違う場合にこれを指定します。
例えば、このアップロードスクリプトの設置ディレクトリと、
このスクリプトを起動する別スクリプトの設置ディレクトリが違う場合は、設定する必要があります。
同じ場合は、この設定はスペースとして下さい。
|
| $dsp_dt = 1; |
転送するファイルの数を指定します。
最大１０件までの転送しか対応しておりません。
|
| $chk_same = 1; |
転送した結果、同名のファイルが存在した場合の対応を指定します。
０＝同名ファイルは置き換え、１＝同名ファイルが存在した場合はエラー
|
| $password = '123'; |
処理パスワードを指定します。
|