LWPで進捗を表示してダウンロード

hanekomuさん作成のLWP::UserAgent::ProgressBar というものがあります。
http://search.cpan.org/dist/LWP-UserAgent-ProgressBar/lib/LWP/UserAgent/ProgressBar.pm

ただ、これ、get しか対応してません。postに対応した版は、code reposにちょっと前にcommitしました。
http://coderepos.org/share/browser/lang/perl/LWP-UserAgent-ProgressBar/trunk