sub get_image2{                                         
my $bunny = $top->Photo(-file => 'somebig.jpg');                                           
return $bunny;                                                                            
}