my $json = new JSON; my $google = WebService::Simple->new( base_url => "http://ajax.googleapis.com/ajax/services/search/images", param => {api_key => $key,} ); for (my $i=0; $i<$number; $i+=4) { my $hashref1 = $google->get( {v => "0.1", q => "$query", rsz => "small", hl => "ja", start => "$i"} ) or die "Could not get google images: $!\n"; } }