my %daten = ();
for(0..100)
{
$daten{'ent' . $_} = 'bla' . $_;
}