indexes zählen (Allgemeines zu Perl)

Froschpopo

2007-06-15 01:35

User since
2003-08-15
2653 articles
BenutzerIn
[default_avatar]

$array ist eine Arrayreferenz.
Wie kann ich die Elemente ohne Schleife zählen?

Ronnie

2007-06-15 01:47

User since
2003-08-14
2022 articles
BenutzerIn
[default_avatar]

Code: (dl )

#!/usr/bin/perl

use strict;
use warnings;

my $ref = [ qw/foo bar buz/ ];
print scalar @{$ref}, "\n";

ptk

2007-06-15 01:51

User since
2003-11-28
3645 articles
ModeratorIn
[default_avatar]

Code: (dl )

use 5.9.5; say scalar grep { time } @$array_referenz;

Dieses Codestück hat nur ein Problem: es funktioniert nicht am 1. Januar 1970 um Mitternacht. Das löse ich, indem ich perl 5.9.5 erzwinge, welches bekanntermaßen erst seit 2007 erhältlich ist. Als Nebeneffekt kann ich sogar "say" statt "print" schreiben.

:-)

shigetsu

2007-06-15 06:15

User since
2007-04-22
16 articles
BenutzerIn

Wers kryptisch mag (der Vollständigkeit halber):

Code: (dl )

print $#$ref+1;

Was annimmt, das $[ gleich 0 is (default).\n\n

renee

2007-06-15 11:24

User since
2003-08-04
14371 articles
ModeratorIn

Einfach nur wegen TIMTOWTDI ;)

Code (perl): (dl )

1
2

my $ref = [1,2,3];
print @$ref . '';

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

shigetsu

2007-06-15 15:50

User since
2007-04-22
16 articles
BenutzerIn

Oder

Code: (dl )

0+@$ref

;-)

MisterL

2007-06-15 16:07

User since
2006-07-05
334 articles
BenutzerIn
[default_avatar]

TATMWTDI
There are too much ways to do it
:-D

...ist doch so, wenn man sich die Vorschläge anschaut

(scnr)

“Perl is the only language that looks the same before and after RSA encryption.”

renee

2007-06-15 16:20

User since
2003-08-04
14371 articles
ModeratorIn

Es kommt darauf an, wie man es sieht. Der eine fühlt sich von so viel Freiheit erschlagen und möchte dass es nur *einen* Weg gibt, der andere freut sich, so viele Wege gehen zu können. Aber die Diskussion um verschieden Programmiersprachen hatten wir letzt erst. Hier bitte keine Diskussion losbrechen.

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/