in reply to perl look ahead regular expression that is optional?
See if you can write an expression that satisfies this spec.