Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
print "Next available number is : $num\n";

#NEXT_UID=14

Select or download this

#!/usr/bin/perl

...
print "Next available number is : $num\n";