\" comments weren't recognized in column 0.
This commit is contained in:
parent
b0bd4e90ac
commit
966d3e7820
1 changed files with 1 additions and 1 deletions
|
@ -13,7 +13,7 @@ print "<head>\n";
|
||||||
|
|
||||||
line: while (<>) {
|
line: while (<>) {
|
||||||
chomp; # strip record separator
|
chomp; # strip record separator
|
||||||
s/([^\\](\\\\)*)\\\".*/$1/g; # strip comments
|
s/((^|[^\\])(\\\\)*)\\\".*/$1/g; # strip comments
|
||||||
|
|
||||||
@a = req($_);
|
@a = req($_);
|
||||||
if (!@a) {
|
if (!@a) {
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue