Jessica Pegula Triumphs in Berlin After Saving Five Match Points