Re: telephone book

[email protected] (Levi Elias Nystad-Johansen via beginners) Thu, 22 Jun 2023 08:45:19 +0000
Newsgroups perl.beginners
Message-ID <2VPhbgD4RQe6uithkbDFxpshPOQZMhV1_4vzfEWJUKZS1juX-spasVT3nGsPSfU_-f7hW4rJvvwlvoKfQQc1xFFWMX-jJe--8QeZ8d5yiSw=@protonmail.com>
Hi,

Not sure exactely what you mean, but here is a one-liner that'll produce 100 phone numbers in sequence, from a random starting point:

perl -E '$start = 10_000_000 + int 89_999_899*rand; say for $start..$start+100'

Hope it helps :)

-L

------- Original Message -------
On Thursday, June 22nd, 2023 at 1:49 AM, William Torrez Corea <[email protected]> wrote:

> What do I need to do to develop a telephone book in Perl?
>
> In my country the phone number has 8 digits, i want to generate random numbers but with the same sequence. I want to get at least some number registered in the telephone exchange [unknown number].
> --
>
> With kindest regards, William.
>
> ⢀⣴⠾⠻⢶⣦⠀
> ⣾⠁⢠⠒⠀⣿⡁ Debian - The universal operating system
> ⢿⡄⠘⠷⠚⠋⠀ https://www.debian.org
> ⠈⠳⣄⠀⠀⠀⠀