On Wed, 11 Sep 2002, Marija Silajev wrote:
> Hi,
>
> I create a hash like following:
>
>
> $Data{$KEYS} = { key1 => [@array1],
> key2 => [@array2],
> };
>
>
> with:
> foreach $KEYS ( keys %Data){
> print "Key1 data : @{$Data{$KEYS}{key1}}\n";
> }
>
> I manage to print the whole @array1 in one line like:
>
> Key1 data : 4321 432 765 341
>
> and i would like it to look like
> Key1 data :
>
> 4321
> 432
> 765
> 341
You can loop through the array and print each element with a newline or
you can try this.
{
local $" = "\n"; # perldoc perlvar
print "Key1 data :\n\n@{$Data{$KEYS}{key1}}\n";
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]