--- <bottlers.pl> ----------------------------------
#!perl -w
@bottlers = ("Signatory","Gordon & MacPhail",
"The bottlers");
print "Abfüller:\n";
foreach $bottler (@bottlers) {
print "- $bottler\n;
}
print "\nUnd nun das Ganze alphabetisch sortiert:\n";
@sorted = sort @bottlers;
$number_of_elements = @sorted;
for($i=0;$i < $number_of_elements;§i++) {
print "- " . $sorted[$i] ."\n";
}
--- </bottlers.pl> ----------------------------------
warum geht das nich? grad mal 4 seiten weiter ... aber jetz weiss ich wirklich nimmer ob das buch so gut is
.::KLINT::.