#!/usr/bin/perl -w

use LWP::Simple;
use strict;

my $image = getstore("http://www.perltraining.com.au/images/logo.png",
                     "/tmp/logo.png") or die "no content?";