my $UniqueID = to_base( 62, $$ ) . to_base( 62, time );