added all tests from perl 5