char *strsep(char **stringp, const char *delim)
{
    int n,i;
    char *p=*stringp,*orig=*stringp;

    if(*stringp==NULL || delim==NULL)
        return(NULL);

    *stringp=NULL;
    for(n=0;n<strlen(orig);n++,p++)
    {
        if(!strncmp(p,delim,strlen(delim)))
        {
            for(i=0;i<strlen(delim);i++,p++)
                *p='\0';
            *stringp=p;
            break;
        }
    }

    return(orig);
}