Help for this page
qr/($QUOTED|$NUM)(?(?{ '.' eq $+ })$FAIL)/;
qr/($QUOTED|$NUM)(?(?{ '.' eq $+ or not length( $+ ) })$FAIL)/;