use extended regex rather than perl regex