my {$HRT,$RD,$WR.$LL,$DC} = {0,1,2,3,4}
[download]

Your code does not even compile. Please post a short, self-contained program that we can run.

G'day suvendra123,

As already pointed out by ++Corion, the code you posted does not compile. It has so many problems that I don't know where to start. If you post the actual code that produced your broken output, we can tell you where you went wrong. Please post that code, and any output, within <code>...</code> tags. Thankyou.

These two lines produce the output that you seem to want, assuming '[1}' should in fact be '{1}'.

$ perl -E '
    my @a = qw{HRT RD WR LL DC};
    say "bins $a[$_] = {", $_, "};" for 0 .. $#a;
'
bins HRT = {0};
bins RD = {1};
bins WR = {2};
bins LL = {3};
bins DC = {4};
[download]

I initialized the hash of names to values using what is called a "hash slice". This allowed me to do the initialization all in one step. Then once again used the order of the @binNames array to access and print the hash keys and their values in the proper order.

use strict;
use warnings;


my @binNames = qw(HRT RD WR LL DC);
my @values   = qw( 0  1   2  3  4);

my %namedValues;

@namedValues{@binNames}=@values; #a "hash slice"

foreach my $name (@binNames)
{
   print "bins $name = {$namedValues{$name}}\n"; #removed backslashes 
+as spotted by [hippo]
}

__END__
bins HRT = {0}
bins RD = {1}
bins WR = {2}
bins LL = {3}
bins DC = {4}
[download]

   print "bins $name = \{$namedValues{$name}\}\n";

Why are the first two backslashes present? They seem to serve no purpose and just clutter the code.

---

🦛

Correct, removed. Don't know what I was thinking.