Re: variables names used to define variables

Why not just:

my %vars = (
    list   =>  $ENV {LIST_VAR}               // 
               $ENV {LIST_VAR_DEPRECIATED}   //
               "other_list",
    source =>  $ENV {SOURCE_VAR}             //
               $ENV {SOURCE_VAR_DEPRECIATED} //
               "other_source",
);

sub var_from_env_var {
    my $input = shift;
    $vars {$input} // $input;
}
[download]

No evals, no symbolic references, just plain and simple.

Abigail

Comment on Re: variables names used to define variables Download Code

Replies are listed 'Best First'.
Re: Re: variables names used to define variables by Sandy (Curate) on Dec 11, 2003 at 01:32 UTC
Yeah, that ought to work. But sometimes just having fun is worth it too How else can I learn the strengths and weaknesses of a particular method if I don't try it out? But it all honesty, I didn't think of your way. Still new to all of the Perl Possibilities. (FORTRAN doesn't have hashes, pointers, foreach, or...)	[reply]
Re: Re: Re: variables names used to define variables by valdez (Monsignor) on Dec 11, 2003 at 14:52 UTC
You may also find useful a post from liz: defined or: // and //=, because you will need to patch your perl to use the `//` operator... Ciao, Valerio	[reply] [d/l]