This peace of code collects everything after :: as the key name and put anything after the : as the value into the hash %answers.

my %answers ;
for ( @array ) {
  /::([\S]+)[^:]*:(.*)/  and $answers{$1} = $2 ;
}
[download]