/*
  AOJ 2182
  Titl Eleven Lover
  @kankichi573
*/
#include <stdio.h>
#include <string.h>
char digits[80001];
int  hist[11];
int keta;

main()
{
  int ret,i;
  char d;

  while(scanf("%s",digits) && 0!=strcmp("0",digits))
    {
      memset(hist,0,sizeof(hist));
      keta=strlen(digits);
      while(digits[keta-1]<' ')
	{
	  digits[keta-1]='\0';
	  keta--;
	}
      d=ret=0;
      hist[0]=1;
      for(i=keta-1;i>=0;i--)
	{
	  digits[i] -= '0';
	  if((i % 2)==0)
	    d += digits[i];
	  else
	    d -= digits[i];
	  if(d < 0)
	    d+=11;
	  else if(d>10)
	    d-=11;
	  if(digits[i])
	    ret += hist[d]; 
	  hist[d]++;
	}
      printf("%d\n",ret);
    }
  return(0);
}