Re: [Cvs-cvs] ccvs/contrib ChangeLog log_accum.pl

[Mark D. Baushke]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Derek R. Price <address@hidden> writes:

> Mark D. Baushke wrote:
> 
> >     sub STATE_NONE    () { 0; }
> >     sub STATE_CHANGED () { 1; }
> >     sub STATE_ADDED   () { 2; }
> >     sub STATE_REMOVED () { 3; }
> >     sub STATE_LOG     () { 4; }
> 
> The perldoc page on constant wasn't very clear.
> It sounded like they said constants were
> introduced before 5.01, though rereading it they
> may only have meant that the perl compiler
> substitutes constant values for constant
> functions without subroutine call overhead as of
> 5.01.

Looking at the perl source Changes* files tells
you more about what stuff was introduced with
which releases.

> Anyhow, I used only the above part of your
> suggestion, for simplicity's sake.

Sure. I have no problems with

     sub STATE_NONE    { 0; }
     sub STATE_CHANGED { 1; }
     sub STATE_ADDED   { 2; }
     sub STATE_REMOVED { 3; }
     sub STATE_LOG     { 4; }

at all.

> I did leave out the prototypes. Do you know for
> certain that they will work for all perl 5.x?

Nope. Using PERL prototypes would need a 

    require 5.002;

to be sure to get a working version.

Perl 5.002 is where prototypes were added to the
PERL core (circa 1995-09-28).

        -- Mark
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.4 (FreeBSD)

iD8DBQFE0rdhCg7APGsDnFERAo2EAKCRyq/nssKaZ5xbLTrB9BBeTRkrPgCg8LBO
qTfMETqwh0gGDwfiTCWGAAg=
=ZVQ0
-----END PGP SIGNATURE-----