in reply to Constant string reference

use constant: 
#! /usr/bin/perl

use constant{PI => 3.14, STRING => 'Test'};

print PI,"\n",STRING,"\n";

[download]

Replies are listed 'Best First'.
Re^2: Constant string reference
by przemo (Scribe) on Dec 09, 2004 at 13:00 UTC
    I know I can use 'constant' pragma. However, I wanted to use plain scalar for some reasons.
[reply]

In Section Seekers of Perl Wisdom