Data source: http://rosettacode.org/wiki/Substring/Top_and_tail