Re: Unique ID Generator

[Masem]

sprintf is your friend:

my $uniqid = sprintf( "REG-RC-%04d", $id++ );

-----------------------------------------------------
Dr. Michael K. Neylon - [e-mail] || "You've left the lens cap of your mind on again, Pinky" - The Brain
It's not what you know, but knowing how to find it if you don't know that's important

[LostS]

So using the sprintf will put the $id variable where %04d is located?? Trying to figure out in what order I need to do the read and write of the ID.

[LostS]

Hey Masem... I tried this out... Can you look at this and see where I went wrong??

$id = 0;
while ($id < 50) {
    print "Position ID: $positionid<br />\n";
    my $positionid = sprintf( "REG-RC-%04d", $id++ );
}

This is what it printed:

Position ID: REG-RC-0000
Position ID: REG-RC-0000
Position ID: REG-RC-0000
Position ID: REG-RC-0000
Position ID: REG-RC-0000
.....
Did that 50 times...

Any Suggestions??

Billy S.

[LostS]

Nevermind... I am just dumb and reordered the print statement and the sprintf and it works great :)

Thank you SOOOO much :)

Billy S.

[Masem]

The my declaration is messing things up here, as the value you set here is going to be only local to the block and AFTER the print statement, so it's lost.

Try this code:

my $id = 0;
my $positionid;
while ( $id < 50 ) {
   $positionid = sprinft( "REG-RC-%04d", $id++ );
   print "Position ID: $positionid<br />\n";
}

-----------------------------------------------------
Dr. Michael K. Neylon - [e-mail] || "You've left the lens cap of your mind on again, Pinky" - The Brain
It's not what you know, but knowing how to find it if you don't know that's important

[LostS]

I got it working great :)

It reads the file holding the ID's incrememts and the saves it :) THANK YOU

Billy S.

[isotope]

Using -w and strict will help you catch errors like this in your future work.

--isotope
http://www.skylab.org/~isotope/