Added sorting scheme example as perl #250
Merged from DEV