perl で 画像を取得したい - 教えて！goo

下記perlのコードを書いたのですが、なぜか、画像を取得することができません。 メモ帳で開くと、画像データっぽい文字列はあるのですが、普通に見ることができません。 なぜでしょうか？また、どのように改良すれば取得できますか？ ご存知の方教えていただけないでしょうか？ 宜しくお願い致します。 $source = &GetImg('​http://www.goo.ne.jp/img/logo/gootop_logo.gif');​ $FileOut = "tmp.gif"; open(OUT, ">$FileOut"); print OUT $source; close (OUT); sub GetImg() { my($url) = @_; use LWP::UserAgent; my $browser = LWP::UserAgent->n