Fix Str::slug() separator flip.

Previously flip thingy just didn't work because if was set after preg_replace already cleaned up a string. Moved flip above couple of lines and added tests.