[Vienna-pm] Hausbackene Syntaxerweiterung mit Perl5?
Stefan Weiss
spaceman at foo.at
Tue Apr 29 12:34:51 PDT 2008
On 2008-04-29 19:11, Robert Barta wrote:
> my @students = ....;
> my @cleverlies = from $s in @students
> where $s->{marks} > 85
> select $s->{matrikelnr};
Nur for the record, Perl-Syntax dafür wäre ungefähr so:
my @students = (
{name => "agnes", matrikelnr => "123", marks => 80},
{name => "benno", matrikelnr => "456", marks => 90},
{name => "clara", matrikelnr => "789", marks => 99},
);
my @cleverlies = map { $_->{matrikelnr} }
grep { $_->{marks} > 85 }
@students;
> nach welchem Paket koennte ich da schauen? Oder geht
> das gar nicht so einfach?
Um deinen Sourcecode so umzuschreiben, dass nachher Perl rauskommt,
schau dir mal die Source Filter in "perldoc perlfilter" an, oder das
Modul Filter::Simple.
HTH,
Stefan
--
LOAD"Ph'nglui mglw'nafh Cthulhu R'lyeh wgah'nagl fhtagn!",8,1
RUN!
More information about the Vienna-pm
mailing list