new file, shootout ternary used to test over many iterations the speed of some perl code.  In this case, testing on charset canon forms.