Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
...
    my $x = $rng->();
    print "$x\n";
}
  2. or download this
    #!/usr/bin/perl -w
use strict;
...
    my $x = NEXTVAL ( $rng );
    print "$x\n";
}
  3. or download this
    #!/usr/bin/perl -w
use strict;
...
    my $x = NEXTVAL ( $rng );
    print "$x\n";
}
  4. or download this
    #!/usr/bin/perl -w
use strict;
...
    my $x = NEXTVAL ( $rng );
    print "$x\n";
}