perl - WWW::Mechanize : 別のファイル名でファイルをアップロードするには?

Question

WWW::Mechanize アップロード ファイルを別のファイル名で作成するには?

私のコンピュータのファイル名とは異なるファイル名をWebサーバーに表示/記録させたいです。

Answer 1

my $file = [
    'filename-on-disk.txt', # The file you'd like to upload.
    'filename-for-upload.txt', # The filename you'd like to give the web server.
    'Content-type' => 'text/plain' # Any other flags you'd like to add go here.
];

$mech->post("http://example.com/upload.cgi", [
    'upload' => $file
]);

から取得: https://gist.github.com/gaurav/253111#file-file-upload-pl

Answer 2

ハードリンクを使用できます：

link "file_name_on_your_computer","desired_new_name";
# Code to upload the newly created link
unlink "desired_new_name";

ノート

• 大きなファイルを使用している場合、ディスク容量の使用について心配する必要はありません。ファイルは複製されず、ハード リンクは単に同じ inode の新しい名前です。
• このソリューションは、ハード リンクをサポートするファイル システムに限定されます。Windows を使用している場合、元のファイルへのショートカットのみを作成してアップロードすることになる場合があります。