Opened by Gast at 2004-05-24 11:06
User since
2003-08-04
5873 Artikel
ModeratorIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
5873 Artikel
ModeratorIn
[quote=kabel,24.05.2004, 09:19]also, @dateiinhalt ist ein AoA (Array of Arrays). dann hat das statement
die bedeutung, dem ertsen Array in @dateiinhalt $whatever hinzuzufügen, und zwar an das ende.[/quote]
da fehlt wohl noch ein ex-Klammeraffe:
push @{ $dateiinhalt[0] }, $whatever;
Edit: Jupp...
liefert
Die andere (auskommentierte) Zeile tuts.
Edit2: Steht in Deinem Beispielprogramm aber auch richtig.\n\n
<!--EDIT|Crian|1085406567-->
Code (perl): (dl
)
push @{ dateiinhalt[0] }, $whatever;
die bedeutung, dem ertsen Array in @dateiinhalt $whatever hinzuzufügen, und zwar an das ende.[/quote]
da fehlt wohl noch ein ex-Klammeraffe:
push @{ $dateiinhalt[0] }, $whatever;
Edit: Jupp...
Code: (dl
)
1
2
3
4
5
6
my @dateiinhalt = [[],[],[]];
my $whatever = 17.5;
push @{ dateiinhalt[0] }, $whatever;
#push @{ $dateiinhalt[0] }, $whatever;
liefert
Code: (dl
)
1
2
Scalar value @{ dateiinhalt[0] better written as ${ dateiinhalt[0] at C:\Daten\perl\forum\aoa.pl line 4.
Type of arg 1 to push must be array (not array slice) at C:\Daten\perl\forum\aoa.pl line 4, near "$whatever;"Die andere (auskommentierte) Zeile tuts.
Edit2: Steht in Deinem Beispielprogramm aber auch richtig.\n\n
<!--EDIT|Crian|1085406567-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;
use strict; use warnings; Link zu meiner Perlseite
use strict; use warnings; Link zu meiner Perlseite