Fix XSH_ASSERT() on perl 5.8.0
drwxr-xr-x xsh