Question

求一个正则表达式,正整数从小到大（连续）,数字以逗号隔开.

Answer 1

@m=split(',',$str);

$min=-9999999999;

$match=1:

for(@m){

if/^[+-]?d+/ && $_>$min{$min=$_;}

else{$match=0;last;}

}