Declare variable via dereference

[hamilton123]

I have an array of strings @array=("Checkbutton","Label",...) and I want to declare corresponding variables $Checkbutton, $Label automatically.
I tried the declaration my ${$array}, but this gives an error "Can't declare scalar dereference...".
Any suggestions?

Thanks for your help!

 

[stevexff]

Whenever you fell you need to create variable names on the fly like this, your design is wrong. Use a hash instead.

my %form_values;

$form_values{$_} = 0 foreach (@array);

print "Variable: $_\tValue: $form_values{$_}\n" foreach (sort keys @form_values);

or similar. (coded from the hip and untested - no perl on this PC).


Cue ishnid's famous link on the subject...

Steve

[small]"Every program can be reduced by one instruction, and every program has at least one bug. Therefore, any program can be reduced to one instruction which doesn't work." (Object:erlDesignPatterns)[/small]

 

[prex1]

You can't declare those with my.
However you can create them as global variables with
${$array[$i]}=something
(but I suppose you knew this).

prex1

http://www.xcalcs.com

: Online tools for structural design

http://www.megamag.it

: Magnetic brakes for fun rides

http://www.levitans.com

: Air bearing pads

 

[KevinADC]

Use a hash like Steve suggests. Using soft references will just lead to problems. If you already have your array a simple way to build it into a hash is using the map function:

my @array = ("Checkbutton","Label",...);
my %hash = map {$_ => undef} @array;

or something similar. Then you can assign values to the hash keys as needed in your script:

$hash{'Checkbutton'} = 'foo';



------------------------------------------
- Kevin, perl coder unexceptional!

 

[hamilton123]

Thanks very much for your help. I'll try the hash version.

 

[ishnid]

Cue ishnid's famous link on the subject...

Here we go:

http://perl.plover.com/varvarname.html

Hashes all the way.