{
  my $UNIQ_ID = 'a';
  sub next_id { return $UNIQ_ID++ }
}