--- cvsroot/deliantra/Deliantra/bin/cfrenderarch 2006/04/21 12:25:08 1.2 +++ cvsroot/deliantra/Deliantra/bin/cfrenderarch 2008/04/08 20:26:32 1.3 @@ -1,8 +1,10 @@ #!/opt/perl/bin/perl + use Cwd; use Math::VectorReal; use File::Spec::Functions; use strict; + $Math::VectorReal::FORMAT = "x=\"%1.3f\" y=\"%1.3f\" z=\"%1.3f\""; sub slurp { open FO, $_[0] or die "Couldn't open $_[0]: $!"; return join '', }