Creating an anonymous function with create_function