Re: [PERL] 'define' eller 'const' i Perl

[John Mørck Hansen <sslug@sslug>]

On Tue, 13 May 2003 12:29:26 +0200
Peter Makholm <sslug@sslug> wrote:

> John Mørck Hansen <sslug@sslug> writes:
> 
> > Det vil sige at (C kode):
> >
> >    #define MSG_NORMAL 0
> >    const CMSG_EXTEND 1
> >
> > bliver til (perl kode):
> >
> >    my $MSG_NORMAL = 0;
> >    my $CMSG_EXTEND = 1;
> 
> Kan du forklare det ufede i dette? (re din kommentar)

Jeg vil mene at der lettere kan komme fejl som denne:

   my $MsgNormal = 1;

   if($MsgNormal = 0) {
      ...
   }


> Alternativt:
> 
> sub MSG_NORMAL () { 0 }
> sub CMSG_EXTEND () { 1 }

Det kan man gøre men... der er min kode logik stoppet!. Det kan godt
være det et mit hoved der er noget galt med men... det forklare efter
min mening mere om sprogets mangler en fordele!.

 
> Hvis det er dollartegene du føler dig generet af. 

Ja, dem er jeg rimelig træt af. sslug@sslug @{$v{k}}. Er det fordi manden bag
Perl ikke kunne finde ud af at lave en parser. OK, lidt hård sagt Sorry!

Det er flere ting jeg også syntes er godt ved Perl. De mange moduler og
den måde man kan tilføje og vedligeholde sine moduler på. Det er helt
okay!.


> Med -P flaget kan man også få perl til at smide scriptet gennem cpp
> hvis man gerne vil have cpp-defines. Læs perlrun-manualsiden, der er
> nogle fæller.

Der står jeg af.


> Men i vore dage ville jeg mene at cpp er en dårlig undskyldning for
> ikke at lave et ordentligt modulært sprog.

Jeg kan kun sige en ting... HVORNÅR KOMMER DET. Det ville være rart hvis
C++ blev til D+=D++... ups den ender med at blive meget høj!.

Nå, indtil vidre lever jeg med det!.

(John =;-)
-- 
Din sikre vej til en sikker backup løsning til dit netværk.
Hurtigt, nemt og bekvemt
http://www.adilock.dk/~john/albackup/
http://www.adilock.dk