Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Include Constants from other files

by Chmrr (Vicar)
on Nov 13, 2002 at 07:31 UTC ( [id://212511]=note: print w/replies, xml ) Need Help??


in reply to Include Constants from other files

This is because of the way that use constant does its stuff -- it creates subroutines with empty prototypes in the current package. Here's one way to make it work; put the following lines in a file called Consts.pm:

package Consts; use constant PI => 3; # We're REALLY approximate, here. "Some true value as the last statement.";

In your main perl file (say, test.pl or somesuch) we'd say:

#!/usr/bin/perl -w use strict; use Consts; print "Pi is:", Consts::PI, $\;

See perldoc constant for more information -- there's a section which describes exactly this (search for the word "package")

perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://212511]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others imbibing at the Monastery: (7)
As of 2024-03-28 15:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found