Re: Load hash from a scalar
- From: krahnj@xxxxxxxxx (John W. Krahn)
- Date: Mon, 31 Mar 2008 00:49:26 -0700
sanket vaidya wrote:
From: scooter [mailto:verma.abhinav@xxxxxxxxx]
I want to load the value from scalar variable to a hash
Example:
my $a = "a, 1, b, 2, c, 3";
Now, I need to create a hash %b, which holds values like
%b = { a => 1, b => 2, c => 3 };
Here is the code to accomplish your task.
use warnings;
use strict;
my $a = "a, 1, b, 2, c, 3";
$a =~ s/ //g; #delete spaces from $a
You can do that more efficiently with tr///:
$a =~ tr/ //d; #delete spaces from $a
my @array = split(",",$a);
Or you can delete the spaces when you split the string:
my @array = split / *, */, $a;
my %b = (
$array[0] => $array[1],
$array[2] => $array[3],
$array[4] => $array[5]
);
You can just assign a list directly to a hash:
my %b = @array;
Or just assign the list returned from split:
my %b = split / *, */, $a;
for (keys%b)
{
print "$_ => $b{$_}\n";
}
The output is:
c => 3
a => 1
b => 2
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
.
- References:
- Load hash from a scalar
- From: Scooter
- RE: Load hash from a scalar
- From: Sanket Vaidya
- Load hash from a scalar
- Prev by Date: perl byte code generation
- Next by Date: Re: commify_series script in cookbook page 94
- Previous by thread: RE: Load hash from a scalar
- Next by thread: special chars as scalar inside regex
- Index(es):
Relevant Pages
|
|
