in reply to Re^4: regex return true instead of false (precedence)
in thread regex return true instead of false
Also you can waste one line of code for making first conditional to have the same line-format as others:
Of course regex can be simplyfied as AnomalousMonk have shown here Re: regex return true instead of false.
...or equivalently inside regex:if( not 0 || $args =~ /\-rs(\s+)(\S+)/x # || $args =~ /\-? (\s+)(\S+)/x || $args =~ /\-p (\s+)(\S+)/x || $args =~ /\-P (\s+)(\S+)/x ){ ... }
edit: not equivalently, because there are 8 capturing groups instead of 2 :)if( $args !~ / (*FAIL) | \-rs(\s+)(\S+) # | \-? (\s+)(\S+) | \-P (\s+)(\S+) | \-p (\s+)(\S+) /x ){ ... }
Of course regex can be simplyfied as AnomalousMonk have shown here Re: regex return true instead of false.
In Section
Seekers of Perl Wisdom