my $data_source = {}; for( my $i = 0; $i < 10; $i++) { push @{$data_source->{a}}, "source a's data"; push @{$data_source->{b}}, "source b's data"; push @{$data_source->{c}}, "source c's data"; }