Kompaktere und wartbare Funktionen schrieben - #104802 (Allgemeines zu Perl)

ptk

2008-01-16 21:39

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

Vielleicht so?

Code: (dl )

if ($server_instanz =~ /(   aja[1-6]
                        | antef[1-6]
                        )/x) {
    return $1;
}