nicht angemeldet
Hi,
my $anzahl = () = /$POSTING_START/gs;
Exquisit! Sowas hab ich gesucht! In welchem perldoc steht sowas ;)?
hm, perldoc perlref würde ich tippen. Stichwort "anonymous array".
Wird dabei $_ ueberschrieben???
Probier's aus!
$_ = 'test'
my $anzahl = () = /$POSTING_START/gs;
print $_;
etc. (TIMTOWTDI)
"There Is More Than One Way To Do It."
Das ist übrigens _der_ Grundsatz von Perl!
if ($a != $b) { &tuwas; }
unless ($a == $b) { &tuwas; }
&tuwas if ($a != $b);
&tuwas unless ($a == $b);
($a != $b) && &tuwas;
...
Der Entwickler von Perl ist übrigens in der Linguistik zu Hause - Perl läßt sich daher schreiben, wie man spricht! :-)
* Variablennamen in Perl werden ueblicherweise klein geschrieben.
Zu viele Sprachen versauen den Stil, ich glaub das stammt noch aus
meinen GFA-Basic Zeiten, ich merks mir!
Noch mal die Empfehlung: perldoc perlstyle
Man muß nicht mit allem davon einverstanden sein (mein Stil weicht auch davon ab), aber diese Dokuseite enthält doch einige sehr nützliche Grundsätze, die vor allem das Verstehen _fremder_[1] Codes vereinfacht.
[1] Dazu gehören auch die eigenen - oft schon nach wenigen Tagen ;-)
Cheatah