Opened by Astralkeks at 2012-08-27 11:28
User since
2003-08-04
12208 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-04
12208 Artikel
Admin1
wenn ich das machen würde, sähe das vermutlich so aus:
my @p22 = grep { ( $Devices{$_}->{22} || 0 ) == 1 } keys %Devices;
falls der wert immer nur 1 ist und ansonsten der port-key gar nicht existiert (oder der wert 0 ist), ginge auch:
my @p22 = grep { $Devices{$_}->{22} } keys %Devices;
my @p22 = grep { ( $Devices{$_}->{22} || 0 ) == 1 } keys %Devices;
falls der wert immer nur 1 ist und ansonsten der port-key gar nicht existiert (oder der wert 0 ist), ginge auch:
my @p22 = grep { $Devices{$_}->{22} } keys %Devices;
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
lesen:
Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem