-$output_string .= "<?xml version='1.0'?>\n";
-$output_string .= "<!DOCTYPE platform SYSTEM \"simgrid.dtd\">\n";
-$output_string .= "<platform version=\"$toversion\">\n";
-$output_string .= " <AS id=\"AS0\" routing=\"Full\">\n";
+$output_string = "<?xml version='1.0'?>\n".
+ "<!DOCTYPE platform SYSTEM \"http://simgrid.gforge.inria.fr/simgrid.dtd\">\n".
+ "<platform version=\"$toversion\">\n";
+
+
+my($AS_opened)=0;