in reply to Need help assembling a list
$anz= @cves; while (@ips) { say "IP address $_ gets CVE ", $cves[int(rand($anz))]; } [download]
The shuffle isn't necessary in that case