Re: Printing an array of hash refs
From: Paul Lalli (mritty_at_gmail.com)
Date: 09/22/04
- Next message: Yash: "Exclusive file access"
- Previous message: Tony N.: "Printing an array of hash refs"
- In reply to: Tony N.: "Printing an array of hash refs"
- Next in thread: Shawn Corey: "Re: Printing an array of hash refs"
- Reply: Shawn Corey: "Re: Printing an array of hash refs"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Wed, 22 Sep 2004 15:49:15 GMT
"Tony N." <tnitzke@simpson.com> wrote in message
news:638483db.0409220735.49486c78@posting.google.com...
> I'm using the following code to print an array of hash refs. It seems
> to me there should be a more concise way to do this. I don't like the
> trailing \t or the extra line of code to get the \n. Any pointers
> would be appreciated.
> for my $row (@rows) {
> print "$row->{$_}\t" for sort keys %{$row};
> print "\n";
> }
for my $row (@rows){
print (join ("\t", sort keys %$row), "\n");
}
Paul Lalli
- Next message: Yash: "Exclusive file access"
- Previous message: Tony N.: "Printing an array of hash refs"
- In reply to: Tony N.: "Printing an array of hash refs"
- Next in thread: Shawn Corey: "Re: Printing an array of hash refs"
- Reply: Shawn Corey: "Re: Printing an array of hash refs"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|
