Suche nach Zahlen

[jonny]

Guten Morgen,

kann mir jemand ein Beispiel geben, wie folgendes komfortabler geschrieben werden kann?

my $nmb="11";

if($nmb=~/^1$|^4$|^8$|^12$/) {
   print "Zahl ist 1, 4, 8 oder 12\n";
}
else {
   print "Zahl ist nicht 1, 4, 8 oder 12\n";
}

Für Hilfe wäre ich Dankbar.

Mfg,
Jonny

[katzy]

hatte heute 4 richtige im lotto...
aber das ist es wohl net was du suchst.

:-) viel erfolg

[jonny]

hatte heute 4 richtige im lotto...

:-) viel erfolg

Sausack ;-)

Bis dann, gehe jetzt schlafen!

Mfg,
Jonny

[katzy]

*kichert*
sausäckin! wenn schon denn schon ..
penn gut
:-)

[jonny]

*kichert*
sausäckin! wenn schon denn schon ..

frau, ich habs geahnt, mich nur net getraut :-)

erzähl schon... hast ne lösung? soviel zeit ist noch...

ich hab nem kumpel mein perl buch geliehen, kann net nachschlagen :(

Mfg,
Jonny

[Katzy]

wenn ich eine hätte, würde ich sie dir sofort verraten! .. aber ich kenn nur eine pearl gut, meine mietze katze.
verry sorry.. vielleicht heitert dich ja ein lächeln auf?
*grinsganzbreit*

[ziegenmelker]

moin, moin,

kann mir jemand ein Beispiel geben, wie folgendes komfortabler geschrieben werden kann?

my $nmb="11";

if($nmb=~/^1$|^4$|^8$|^12$/) {
   print "Zahl ist 1, 4, 8 oder 12\n";
}
else {
   print "Zahl ist nicht 1, 4, 8 oder 12\n";
}

print $nmb=~/^1$|^4$|^8$|^12$/? "Zahl ist 1, 4, 8 oder 12\n":"Zahl ist nicht 1, 4, 8 oder 12\n"

Ist es das was Du suchst?
Achte darauf, alles gehört in eine Zeile.

cu,
ziegenmelker

[jonny]

Hallo ?ziegenmelker? :-)

ich meinte eher das hier

$nmb=~/^1$|^4$|^8$|^12$/

gibts da was netteres?

Mfg,
Jonny

[Klaus Mock]

Hallo,

$nmb=~/^1$|^4$|^8$|^12$/

gibts da was netteres?

$nmb=~/^(1|4|8|12)$/
z.B.

Grüße
  Klaus

[jonny]

hi klaus,

$nmb=~/^(1|4|8|12)$/
z.B.

oh man und ich dussel habs mit $nmb=~/^[1]$/ versucht!

danke, klappt!

Mfg,
Jonny

---

1. 1|4|8|12 ↩︎