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

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