X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/9b5104b79979b6fff2a0a9a22e907da22efd5ecb..46448320f12d59d0a5efc015ec51ec6ebba525c6:/contrib/deployment_generation/generate_random_deployment.pl

diff --git a/contrib/deployment_generation/generate_random_deployment.pl b/contrib/deployment_generation/generate_random_deployment.pl
index 32476b036c..bd353fae3c 100755
--- a/contrib/deployment_generation/generate_random_deployment.pl
+++ b/contrib/deployment_generation/generate_random_deployment.pl
@@ -1,5 +1,13 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
+
+# Copyright (c) 2009, 2011, 2014. The SimGrid Team.
+# All rights reserved.
+
+# This program is free software; you can redistribute it and/or modify it
+# under the terms of the license (GNU LGPL) which comes with this package.
+
 use strict;
+use warnings;
 
 sub melange {
     my $tableau=shift;
@@ -55,7 +63,7 @@ sub generate_random_deployment{
 
     print OUTPUT <<EOF;
 <?xml version='1.0'?>
-<!DOCTYPE platform SYSTEM "simgrid.dtd">
+<!DOCTYPE platform SYSTEM "http://simgrid.gforge.inria.fr/simgrid.dtd">
 <platform version="2">
 EOF
 
@@ -101,7 +109,7 @@ sub generate_random_deployment2{
 
     print OUTPUT <<EOF;
 <?xml version='1.0'?>
-<!DOCTYPE platform SYSTEM "simgrid.dtd">
+<!DOCTYPE platform SYSTEM "http://simgrid.gforge.inria.fr/simgrid.dtd">
 <platform version="2">
 EOF