Re: [PERL] Funktion til at finde lige/ulige

[Michael Nielsen <sslug@sslug>]

kim Schulz wrote:

> Nils Lastein wrote:
> >
> > Kan du ikke forklare den syntaks? Spm.tegnet og kolon!!!!
> >
> > Nils
> >
> > > > if ($counter er lige){dsddh;} elsif ........
> > >  print $nr;
> > >  $nr % 2 ? print " er ulige\n" : print " er lige\n"
>
> er $nr deleligt med 2 ? "dette gøres ved false": "dette gøres ved true"

du kan også

    if (a&0x01) {
        ulige
    }
    else {
        lige
    }

Dette bure være hurtiger (bitwise and). - da division er normalt langtsom.

--
#include "stddisclaimer.h"

 Email : mailto://sslug@sslug Org :        DKUUG, *Team Amiga*, SSLUG
 Telf  :   +45 39670249          Fax :              +45 35110000---04586
 ICQ   :       53913906          Web : http://vip.cybercity.dk/~ccc30647
        (Hard work is great, as long as you also remember to live)