ns-3.9: utils/generate-distributions.pl@56e28e34e109 (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>
	Fri, 21 Mar 2008 13:41:16 -0700
changeset 2693	56e28e34e109
parent 191	411f29b214f0
permissions	-rwxr-xr-x