Commit 8b5731b7 authored by Arnaud Legrand's avatar Arnaud Legrand

[HTML] Use strict and fix syntax....

parent 7c88620b
...@@ -80,8 +80,8 @@ while(defined(my $line=<INPUT>)) { ...@@ -80,8 +80,8 @@ while(defined(my $line=<INPUT>)) {
# } # }
#### Changing headers #### Changing headers
foreach($i in (4,3,2,1)) { foreach my $i (4,3,2,1) {
$j=$i+1; my($j)=$i+1;
$line =~ s|<h$i|<h$j|g; $line =~ s|<h$i|<h$j|g;
$line =~ s|</h$i|</h$j|g; $line =~ s|</h$i|</h$j|g;
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment