#!/usr/bin/perl -w

use strict;
use Image::Grab;

my $image = new Image::Grab;

$image->url('http://www.mysite.com/my.jpg');
$image->grab_new;