foreach my $vulnerabilityText (@records)
{
	$vulnerabilityText =~ m/Remediation Report\n\n(.+?)\n|^(.+?)\n/;
	my $vulnerabilityName = $1;

	print($vulnerabilityName, "\n");
}