考虑以下正则表达式:
^[:;][-^]\)$
列出所有与这个表达式完全匹配的字符串，或者，如果有十个以上这样的字符串，则描述它们。
最佳答案
假设闭括号是假的，这里有一个巧妙的解决方案:
% echo {':',';'}{'-','^'}\)
:-) :^) ;-) ;^)
当然是:
% perl -le 'print for <{:,;}{-,^})>'
:-)
:^)
;-)
;^)
这不是很酷吗？
当然还有这个:
#!/usr/bin/perl
use 5.010 ;
$stdout = 124.102.109.116;
open
stdout ;
use less
${"\42"} = "\54" ;
say
for
@224 =
eval
join
/\/\/\/∖/ =>
map
{"<$_>"}
join
/\/\/\/∖/ =>
map
{"{@$_}" }
[qw{ | [ } ] =>
[qw{ : ; % # } ] =>
[qw{ ^ = * _ ~ } ] =>
[qw{ / v ) | o 3 I } ]
愉快地产生了这个:
|:^/ |:^v |:^) |:^| |:^o |:^3 |:^I |:=/ |:=v |:=) |:=| |:=o |:=3
|:=I |:_/ |:_v |:_) |:_| |:_o |:_3 |:_I |:~/ |:~v |:~) |:~| |:~o
|:~3 |:~I |;^/ |;^v |;^) |;^| |;^o |;^3 |;^I |;=/ |;=v |;=) |;=|
|;=o |;=3 |;=I |;_/ |;_v |;_) |;_| |;_o |;_3 |;_I |;~/ |;~v |;~)
|;~| |;~o |;~3 |;~I |%^/ |%^v |%^) |%^| |%^o |%^3 |%^I |%=/ |%=v
|%=) |%=| |%=o |%=3 |%=I |%_/ |%_v |%_) |%_| |%_o |%_3 |%_I |%~/
|%~v |%~) |%~| |%~o |%~3 |%~I |#^/ |#^v |#^) |#^| |#^o |#^3 |#^I
|#=/ |#=v |#=) |#=| |#=o |#=3 |#=I |#_/ |#_v |#_) |#_| |#_o |#_3
|#_I |#~/ |#~v |#~) |#~| |#~o |#~3 |#~I [:^/ [:^v [:^) [:^| [:^o
[:^3 [:^I [:=/ [:=v [:=) [:=| [:=o [:=3 [:=I [:_/ [:_v [:_) [:_|
[:_o [:_3 [:_I [:~/ [:~v [:~) [:~| [:~o [:~3 [:~I [;^/ [;^v [;^)
[;^| [;^o [;^3 [;^I [;=/ [;=v [;=) [;=| [;=o [;=3 [;=I [;_/ [;_v
[;_) [;_| [;_o [;_3 [;_I [;~/ [;~v [;~) [;~| [;~o [;~3 [;~I [%^/
[%^v [%^) [%^| [%^o [%^3 [%^I [%=/ [%=v [%=) [%=| [%=o [%=3 [%=I
[%_/ [%_v [%_) [%_| [%_o [%_3 [%_I [%~/ [%~v [%~) [%~| [%~o [%~3
[%~I [#^/ [#^v [#^) [#^| [#^o [#^3 [#^I [#=/ [#=v [#=) [#=| [#=o
[#=3 [#=I [#_/ [#_v [#_) [#_| [#_o [#_3 [#_I [#~/ [#~v [#~) [#~|
[#~o [#~3 [#~I
关于java - 复杂正则表达式，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/4342146/