如何在我的正则表达式中排除空格作为输入

Question

^(?=.*?[A-Z])(?=.*?[a-z])(?=.*?[0-9])(?=.*?[#?!@$%^&*-]).{8,15}$

上面我的正则表达式工作正常,除了它接受空格作为输入.我怎样才能在我的正则表达式中排除空格？

任何与Perl相关的正则表达式都可以.谢谢

Answer 1

更改

.{8,15}

至

[^ ]{8,15}                       # No spaces.

要么

\S{8,15}                         # No whitespace.

要么

[A-Za-z0-9#?!@$%^&*\-]{8,15}     # Only allow specific characters.