Substring program added