Re^4: use and require inside subs


Do you know where your variables are?
	PerlMonks

Re^4: use and require inside subs

by ysth (Canon)

on Nov 03, 2004 at 07:01 UTC ( #404829=note: print w/replies, xml )

Need Help??

in reply to Re^3: use and require inside subs
in thread use and require inside subs

BEGIN {
    if ($^O eq 'MSWin32') {
        use Win32::TieRegistry( Delimiter=>"/", ArrayValues=>0 );
    # load $config from registry
    } else {
        # else load $config from flat files
    }
} # end system specific compile time code
[download]

I think you mean

require Win32::TieRegistry;
Win32::TieRegistry::->import(Delimiter=>"/", ArrayValues=>0 );
[download]

since the way you have it, perl will attempt to use that module even not on Win32.

Another way:

use if $^O eq 'MSWin32',
    "Win32::TieRegistry", Delimiter=>"/", ArrayValues=>0;
[download]

if you have if.

Comment on Re^4: use and require inside subs Select or Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://404829]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others pondering the Monastery: (5)

As of 2023-12-07 22:55 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?