my @eintraege;
$eintraege[5] = 'test 5';
$eintraege[7] = 'test 7';
$eintraege[100] = 'test 100';
print "Scalar: " . scalar @eintraege . "\n";