Re: How do I generate a sequential string?

in reply to How do I generate a sequential string?

Have a look at range-based magical autoincrement and then try something like (warning: untested)

my @chars = (a..z, A..Z, 0..9);
my $glob = '{' . join(',', @chars) . '}';
$glob x= 10;
while (my $string = glob $glob) {
    print $string, "\n";
}
[download]

Juerd
- http://juerd.nl/
- spamcollector_perlmonks@juerd.nl (do not use).

Comment on Re: How do I generate a sequential string? Download Code

Replies are listed 'Best First'.
Re:Interesting anti-virus reaction to this code. by Anonymous Monk on Apr 23, 2003 at 04:05 UTC
I ran this code, and my CPU usage jumped to 80% on my dual processor P3. Perl was using 40% on processor and my anti-virus program kicked in and was using 40% on the other. When I killed the perl script, the anti-virus program stopped. I though that was curious...	[reply]

In Section Seekers of Perl Wisdom