Opened by Sven_123 at 2011-03-11 16:18
User since
2003-08-20
39 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-20
39 Artikel
BenutzerIn
nochmal mit Kommentaren
Code (perl): (dl
)
1 2 3 4 5 6 7
my @y; @y.push([< a b >]); # ein Array als Element ein hängen say @y[0]' # den Array ausgeben say @y[0][0] # ein element ausgeben ==== AUSGABE === a b a
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11
my @y; @y[0]="FRED"; @y.push([< a b > ]); # hinten eine Arrayref einhängen say @y[0]; say @y[0][0] # warum der tut ist mir nicht ganz klar say @y[1][0] ==== AUSGABE === FRED FRED a
Code (perl): (dl
)
1 2 3 4 5 6 7 8
'my @y; @y[1]="FRED"; @y[0]= < a b >; # eine Array Ref übergeben say @y[0][0]; ' ==== AUSGABE === a
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9
my @y; @y[1]="FRED"; @y[0]= < a b >; @y.[0].push("ADDME") ; # in einem AoA rumspielen say @y[0][2]; ' ==== AUSGABE === ADDME
Code: ()
1
2
print&f(($_=(3x3)."3+33")=~s=3(?![^3]|$)=&f=eg);
sub f{eval(@_?$_:"'$&+'x3");}