1
Como imprimo uma regex expandida em formato não expandido?
É possível imprimir um regex criado usando notação expandida ( qr/.../x) em formato não expandido? Por exemplo: my $decimal = qr/ (?=\d|\.\d) # look-ahead to ensure at least one of the optional parts matches \d* # optional whole digits (?:\.\d*)? # optional decimal point and fractional digits /x; say $decimal; …