my (%compdata, $comp, $file, @srcfiles);
for (@data) {
  my ($key, $value) = split /=/;
  for ($key) {
    /component/  && do { $comp = $value; last };
    /version/    && do { $compdata{$comp}{version} = $value; last };
    /sourcefile/ && do 
    { 
        $file = $value; 
        push  (@($compdata{$comp}{$srcfiles}), $value); # <<WRONG
        last 
    };
    /sourcesum/  && do { $compdata{$comp}{sources}{$file} = $value };
  }
}
##</code><code>##

 component=HF
version=NULL
sourcefile=file10
sourcesum=checksum10
sourcefile=file2
sourcesum=checksum2
sourcefile=file3
sourcesum=checksum3
##</code><code>##

'sources' => {
       'file3' => 'checksum3',
       'file2' => 'checksum2',
       'file10' => 'checksum10'
##</code><code>##

'sources' => {
       'file10' => 'checksum10'
       'file3' => 'checksum3',
       'file2' => 'checksum2',