my @notes = ('C', 'C#/Db', 'D', 'D#/Eb', 'E', 'F', 'F#/Gb',
             'G', 'G#/Ab', 'A', 'A#/Bb', 'B');