Zahlenvergleich (Reguläre Ausdrücke): if ($skalar =~ m/[13-52]/) {} ? - #71278 (Allgemeines zu Perl)

renee

2006-11-01 13:30

User since
2003-08-04
14371 Artikel
ModeratorIn

Was meinst Du mit "einfacher"? Schneller? übersichtlicher? kürzer?

TIMTOWTDI

Code: (dl )

my $skalar = 13;
if(grep{$_ == $skalar}(13..52)){
    print "yes\n";
}

Code: (dl )

use List::Util;
my $skalar = 14;
if(first {$_ == $skalar}(13..52)){
    # ...
}

Code: (dl )

my %hash;
my @array = (13..52);
@hash{@array} = @array;

my $skalar = 132;
if(exists $hash{$skalar}){
    print "yes\n";
}

Aber das mit den zwei if's dürfte das schnellste und so ziemlich am besten lesbar sein...