Fix regex to allow hash ref { key => val}->{key}
This commit is contained in:
parent
3bcbec1117
commit
08b8705282
|
@ -29,7 +29,7 @@ sub perlExpr {
|
|||
split( /\n/, $@ ) );
|
||||
return ( -1, "__badExpression__: $err" )
|
||||
if ( $err && $conf->{useSafeJail} );
|
||||
return ( $val =~ qr/(?<=[^=<!>\|\?])=(?![=~])/ && $conf->{avoidAssignment} )
|
||||
return ( $val =~ qr/(?<=[^=<!>\|\?])=(?![>=~])/ && $conf->{avoidAssignment} )
|
||||
? ( 1, "__badExpressionAssignment__" )
|
||||
: 1;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue
Block a user