[Cologne-pm] Sachen, die die Welt nicht braucht, brauchen Deine Hilfe
Christian Schneider
cschneid at spinfo.uni-koeln.de
Fri Apr 11 13:34:42 CDT 2003
On Freitag, April 11, 2003, at 03:54 Uhr, A. Pagaltzis wrote:
>
>> foreach my $a (@a) {
>> foreach my $b (@b) {
>> foreach my $c (@c) {
>
> Das gefiel mir irgendwie nicht, ich hab eine einzige
> Schleife daraus gemacht. Echte Iteratoren hätten's
> aber doch wesentlich einfacher gemacht, als was dabei
> herausgekommen ist. $Godot = "Perl 6";
>
> #
> # my @a = (1 .. 9, 'a' .. 'z', undef);
> # my @b = (1 .. 9, '-', 'a' .. 'z', undef);
> # my @c = (1 .. 9, 'a' .. 'z', undef);
> #
> # my ($a, $b, $c) = (0)x3;
> #
> # while($a < @a) {
> #
> # $c++;
> # $b++, $c = 0 if not defined $c[$c];
> # $a++, $b = 0 if not defined $b[$b];
> # }
>
häh? Wieso soll das denn äquivalent mit der Ursprungsversion sein? a, b
und c haben immer den gleichen Wert, in Cems Version ist das nicht so.
Oder verpasse ich die Magie?
Christian
More information about the Cologne-pm
mailing list