Perl web file download

Reference:
http://jck11.pixnet.net/blog/post/4899927-%E5%88%A9%E7%94%A8lwp%3A%3Asimple%E4%B8%8B%E8%BC%89%E7%B6%B2%E9%A0%81%5Bperl%5D

use LWP::Simple;

my $url = "http://www.otc.org.tw/storage/statistic/financial/O_2013Q2.xls";
my $file = "capital_gretai.xls";
getstore($url, $file);