Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic

Re: Perl : How to Create Unique String/Number?

by sleepingsquirrel (Hermit)
on Jan 27, 2005 at 19:53 UTC ( #425729=note: print w/replies, xml ) Need Help??

in reply to Perl : How to Create Unique String/Number?

Might not be exactly what you're looking for, but maybe a place to start.
#!/usr/bin/perl -w $len = 11 + int(rand(10)); $r .= chr(48 + rand(74)) for (1..$len); $r =~ s/\W//g; print "$r\n";

-- All code is 100% tested and functional unless otherwise noted.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://425729]
[Corion]: Discipulus: I've looked for something but never found anything good
Corion looks at the SVG. If the different regions have IDs, then you can colorize the map by providing a CSS file with the colors.
[Corion]: Meh. IE crashes when displaying that SVG as saved from Firefox ...
LanX blame Canada!

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (10)
As of 2017-03-23 09:31 GMT
Find Nodes?
    Voting Booth?
    Should Pluto Get Its Planethood Back?

    Results (285 votes). Check out past polls.