@{$DATA{$pkg}} = split /(?m)(__\S+?__\n)/, $data;