in reply to building a complex data structure
Expanding on the previous suggestions . . .
my %lookup; $lookup{ $_ } = [ ( 0 ) x 24 ] for ( qw( site1 site2 site3 ) ); [download]