« Array Beispiel | Main | Perl: Arrylänge ermitteln »
16.04.05
Perl: Array Konfusion
#!/usr/bin/perl
use strict;
my @daten4 = ();
my $i = 1;
$daten4[$i] = $i++;
print join(";", @daten4) . "\n";
@daten4 = ();
$i = 1;
$daten4[$i] = ++$i;
print join(";", @daten4) . "\n";
@daten4 = ();
my $i = 1;
$daten4[$i++] = $i;
print join(";", @daten4) . "\n";
@daten4 = ();
$i = 1;
$daten4[++$i] = $i;
print join(";", @daten4) . "\n";
@daten4 = ();
$i = 1;
$daten4[$i] = $i += 1;
print join(";", @daten4) . "\n";
@daten4 = ();
$i = 1;
$daten4[$i] = $i = $i + 1;
print join(";", @daten4) . "\n";
... um Erklärung der Ausgabe wird gebene:
;;1
;;2
;2
;;2
;;2
;;2
Posted by xut at 16.04.05 15:41