{
    use esmith::config;
    use esmith::db;

    my %dungog;
    tie %dungog, 'esmith::config', '/home/e-smith/db/dungog';

    $OUT = '';

    #get records
    my @records = ();
    foreach (sort keys %dungog)
    {
	push (@records, $_)
	    if (db_get_type(\%dungog, $_) eq 'bannedsitelistf2');
    }

    #if they have records add them to the templete
    my $records = @records || '0';
    if ($records > 0)
    {
      $OUT .= "\n";
      $OUT .= "#user records\n";
      $OUT .= "# --------------------\n";

      my $record;
      foreach $record (sort @records)
      {
        my $criterion     = db_get_prop(\%dungog, $record, "criterion")  || '';
        $OUT .= "$criterion\n";
      }

      $OUT .= "\n";
    }
}