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

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