Opened by pktm at 2004-08-10 22:28
User since
2003-08-15
692 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-15
692 Artikel
BenutzerIn
@esskar hat recht. Ich kann das my nicht einfach mittendrin mir reinschreiben, aber so geht es.
Beispielscript:
Ergebis:
Scalar
1. Arrayelement
Beispielscript:
Code: (dl
)
1
2
3
4
5
6
7
8
use strict;
use warnings;
for ('Scalar', ['1. Arrayelement'])
{ my $feld;
ref($feld = $_) eq 'ARRAY' and $feld = $_->[0];
print "$feld\n";
}
Scalar
1. Arrayelement
$SIG{USER} = sub {love 'Perl' or die};