in reply to Re: Unique ID Generator
in thread Unique ID Generator

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++ );
}

[download]

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.

Replies are listed 'Best First'.
Re: Re: Re: Unique ID Generator
by Masem (Monsignor) on Aug 23, 2001 at 19:00 UTC
    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";
}

    [download]

    -----------------------------------------------------
    Dr. Michael K. Neylon - mneylon-pm@masemware.com || "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

[reply]
[d/l]
[select]
      I got it working great :)

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

      Billy S.
[reply]
Re: Re: Re: Unique ID Generator
by isotope (Deacon) on Aug 23, 2001 at 19:33 UTC
[reply]
Re: Re: Re: Unique ID Generator
by LostS (Friar) on Aug 23, 2001 at 18:57 UTC
    Nevermind... I am just dumb and reordered the print statement and the sprintf and it works great :)

    Thank you SOOOO much :)

    Billy S.
[reply]

In Section Seekers of Perl Wisdom