Hi Edward,
Source Code :
#! /usr/bin/perl
%hash1 = (
A => ["fred", "barney"],
B => ["George", "jane", "elroy"]
);
foreach $sub (sort (keys(%hash1))) {
print "$sub\n";
$temp = @hash1{$sub};
for ($i=0;$i<=$#$temp;$i++) {
push(@array1,$temp->[$i]);
}
}
print "@array1\n";
This code will do the intended work.
Regards,
V.Balaji.
--- Edward WIJAYA <[EMAIL PROTECTED]> wrote:
> Hi,
>
> Suppose I have this Hash of array:
>
> %HoA = {
> A => ["fred", "barney"],
> B => ["george", "jane", "elroy"],
> };
>
> Is there any efficient way to append
> each of this HoA's array into one
> single array, e.g:
>
> @name = ("fred", "barney", "george", "jane",
> "elroy");
>
> Regards,
> Edward WIJAYA
> SINGAPORE
>
> --
> To unsubscribe, e-mail:
> [EMAIL PROTECTED]
> For additional commands, e-mail:
> [EMAIL PROTECTED]
> <http://learn.perl.org/>
> <http://learn.perl.org/first-response>
>
>
>
___________________________________________________________ALL-NEW Yahoo! Messenger -
all new features - even more fun! http://uk.messenger.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
