diff --git a/scripts/adherents/adh2list.pl b/scripts/adherents/adh2list.pl
index ed8d4732f59..686088e3b69 100755
--- a/scripts/adherents/adh2list.pl
+++ b/scripts/adherents/adh2list.pl
@@ -49,7 +49,7 @@ $sth->execute;
 
 # get emails of adherents
 while (my @row = $sth->fetchrow_array ){
-    print int($row[0]);
+    print "$row[0]\n";
     push (@adh,$row[0]);
 }