oesi50: Sortieren nach Bachstaben schlägt fehl - warum ?

Beitrag lesen

Hallo,

der Key besteht aus "A$nummer$namedesautors";
(A.., da keine Zahl als erstes stehen darf)

$upautorB{$key} = $upautor;

Deine Antwort erscheint mir rätselhaft, aber probier mal das hier:
-----------------------------------------------------
#!/usr/bin/perl

use strict;

print "Hello, Torwächter...\n";

my %upautorB;

$upautorB{'Fritz'}="Alles";
$upautorB{'Frieda'}="oder";
$upautorB{'Torwächter'}="nichts";
$upautorB{'Arno'}="ist";
$upautorB{'Fred'}="hier";
$upautorB{'Bernd'}="die";
$upautorB{'Susi'}="Frage";

my $alleautorentext ="";

for (sort keys %upautorB){
   $alleautorentext .= qq~<option value="$_">$_</option>\n~;
}
print $alleautorentext;

oesi50