ns-3.24: utils/generate-distributions.pl@b26167ef0c84 (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	Kirill Andreev <andreev@iitp.ru>
	Thu, 12 Mar 2009 13:39:22 +0300
changeset 4800	b26167ef0c84
parent 191	411f29b214f0
permissions	-rwxr-xr-x