[Bioperl-l] Stem-and-leaf plot for fastq scores in a file?

[Albert Vilella]

Hi,

Maybe someone has figured this script out, so I am asking the list:

Given a fastq file with all reads of identical length like this one
(presumably not huge):
http://www.ebi.ac.uk/~avilella/example.fastq

how can I produce a stem-and-leaf plot (or stemplot) of the qscores?

Something simple that prints out the plot to the terminal,

Cheers,

Albert.