perl

perl基本語法 正則表達式 正則表達式 #!/user/bin/perl $_="aabbccaa"; if(/(aa)?(bb)(cc)\1/){ print "XXXX\n" } $_="bbccaa"; if(/(aa)?(bb)(cc)\1/){ print "XXXX\n"; } else{ print "XXXX\n"; } ？表示匹配0次或者1次，\1引用前面第

>>阅读原文<<