",
"Crossfire Map ", ""; print "/ "; for (0 .. $#path - 1) { print "$path[$_] / "; } my @tile = map { $meta->{info}{"tile_path_$_"} ? "" : "" } 1..4; #"}"# vim misparses without this comment print "$path[-1]", "", "", " | ",
"$tile[0] | ||
$tile[3] | ", "", " | $tile[1] | |
$tile[2] |
", escape_html $meta->{info}{msg}, "
"; print "";
if (my $as = $meta->{map}[$x][$y]) {
print " ($x|$y)";
sub print_archs {
print " ";
}
print "
| ";
}
print "
created by cfmap2html version $VERSION
", ""; close $fh; system "gzip", "-7f", "$path.html"; }