Yahoo!オークション - 出品無料キャンペーン (2008-08-20)

こんなに早く告知するとは珍しい。

Yahoo!オークション - 出品無料キャンペーン

2008年8月20日(水)正午から8月21日(木)午後7時まで

コメント

AIMS

困った時だけの書き込みですいません。
昨年からずっとできないで困っている事があるんです。
それは、PERLを使ったAIMSへのファイルのアップロードです。
一念発起で「Webクライアントプログラミング」と言う本を読み、インターネットをここ3日ばかりうろつきましたがやっぱり分かりません。
以下は現在のプログラムの一部です。JUICEさんのプログラムをそのまま使っています。

#価格改定ファイルをアップロード

# リクエストを投げるURL
my $url = "https://vendornet.amazon.co.jp/exec/panama/seller-admin/catalog-upload/modify-only";

# レポートの種類 OrderListings=出品一覧Listings

my $ua = LWP::UserAgent->new;
my $header = HTTP::Headers->new(
Authorization=>"Basic $auth",
UploadFor=>"Marketplace",
FileFormat=>"TabDelimited",
Cookie=>"$session_id $session_id_time $ubid_main"
);

#open(FIL,"inv-ldr.txt");#出品用ファイル名
#my @file_name=FIL;
#close (FIL);

my $req = HTTP::Request->new(POST=>$url, $header);
$req->content(inv-ldr.txt);#この部分を追加。代わりにinv-ldr.txtを@file_nameに入れて$req->content(@file_name)もダメ

my $res = $ua->request($req);

「'_content' => 'NO_FILE_ATTACHED'」が返ってきます。
時間がある時で結構ですからアドヴァイスをお願いします。
素人の質問、ご迷惑でしたらこのコメントを削除してください。

RE:AIMS

molkさん、お久しぶりです。

現在取り込み中のため、回答までに少し時間を下さい。
(どんな質問でも歓迎ですよ。)

では、後ほど。

molk

お返事ありがとうございます。
気長に待ってます。
プログラミングの独習は、なかなか難しいものですね。
でも、上手く動くと楽しいので、お馬鹿でもやめられません。(笑)

ブックオフオンライン