RE: Hash of Arrays Question

[J. Patrick Lanigan]

Thank you so much for your help Gary and Jason. I tried the following and it
works perfectly.

Patrick

#!c:/perl/bin/perl -w
use strict;
my %tracks=(); # create empty hash

$tracks{'test'}->{artist}='test_artist';
$tracks{'test'}->{title}='test_title';
$tracks{'test2'}->{artist}='test_artist2';
$tracks{'test2'}->{title}='test_title2';

for my $row ( keys %tracks ) {
        my $artist = $tracks{$row}->{artist};
        my $title  = $tracks{$row}->{title};
        print '\$row=', $row, "\n", '\$artist=', $artist, "\n", '\$title=', $title,
"\n";
}