char *TrimCpy(char *d,char *s) {
  char *esp=d,c;
  if(d) {
   do ; while( (*s++)==32 ); s--;
   do {
    c=*s++; *d++=c; if( (c!=32) && (c>0) ) esp=d; }
   while (c>0);
   *esp=0;
  }
  return d;
 };                                              /* Trim Cpy $VER 0.1 */

int main(int argc,char *argv[]) {                             /* MAIN */
  long el=0; char s[256],d[256];
  strcpy(s,"   testTrim");     TrimCpy(d,s); printf("-%s- = -%s-\n",s,d);
  strcpy(s,"   test  Trim");   TrimCpy(d,s); printf("-%s- = -%s-\n",s,d);
  strcpy(s,"   test  Trim  "); TrimCpy(d,s); printf("-%s- = -%s-\n",s,d);
  strcpy(s," ");               TrimCpy(d,s); printf("-%s- = -%s-\n",s,d);
  strcpy(s,"");                TrimCpy(d,s); printf("-%s- = -%s-\n",s,d);
  return el;
 }                                                             /* END */