#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#define XARG 123

#include "StringTest.h"


MODULE = MyStringTest           PACKAGE = MyStringTest


char*
TestStringAdd (a,b)
        char* a
        char* b


        CODE:
                char* c;
                char* d;
                int length;
                c = StringAdd(a, b);

                length = strlen(c);
                Newz (XARG, d, length, char*);

                strcpy (d, (const char*)c);

                // deallocate Memory
                FreeMemory (c);

                printf ("Name::%s\n", d);
                printf ("Length::%d\n", length);
                RETVAL = d;

        OUTPUT:
          RETVAL