ns-3.9: utils/generate-distributions.pl@411f29b214f0 (annotated)

191 411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	1	#!/usr/bin/env perl
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	2
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	3	use Math::Random qw(:all);
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	4
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	5	@values = random_uniform (10000, 0, 10000000);
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	6
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	7	foreach $value (@values) {
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	8	print $value . "\n";
411f29b214f0 add small perl utility to generate static sample distributions Mathieu Lacage <mathieu.lacage@sophia.inria.fr> parents: diff changeset	9	}

author	Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
	Tue, 12 Dec 2006 14:02:07 +0100
changeset 191	411f29b214f0
permissions	-rwxr-xr-x