After reading the fastqc_data.txt file, this function separates the modules into a list
Value
list, The list contains modules and each module has "content", "status"; The list also contains comments.
Examples
lines <- readLines(system.file("extdata", "SRR622457_2_fastqc.txt", package = "fastqcviz"))
modules <- separate_modules(lines)