my $pdata = $ua->get($ur_to_image);
my $pixbufloader = Gtk2::Gdk::PixbufLoader->new;
my $raw_data = $pdata->decoded_content;
$pixbufloader->write($raw_data);
$pixbufloader->close;		
$pixbuf = $pixbufloader->get_pixbuf;
my $w = $pixbuf->get_width;
my $h = $pixbuf->get_height;
$w = int($w *1.2);
$h = int($h * 1.2);
my $scaled = $pixbuf->scale_simple($w, $h, 'GDK_INTERP_BILINEAR');
$im->set_from_pixbuf ($pixbuf);