#include <stdio.h>

char s[4000];
char buf[4000];

int main(){

  freopen( "encoding.in", "r", stdin );

  while( scanf("%[A-z _ 0-9 \-.,;:]\n", s)== 1 ){
    int n=0;
    int c=0;
    int ones=0;
    int b=0;

    while( 1 ){

      for( n=0; s[n+c] == s[c+n+1] && n<=7; n++ );
      if( s[c+n] == '\0')break;

      if(n == 0){
	if( s[n+c] == '1' )buf[b++]=s[n+c];
	buf[b++]=s[n+c];
	ones=1;
	c++;
      }else{
	if( ones == 1){
	  buf[b] = '\0';
	  printf("1%s1",buf);
	  b=0;
	}
	printf("%d%c",n+1,s[c+n]);
	c+=n+1;
	ones=0;
      }
    }
    if(b!=0){
      buf[b] = '\0';
      printf("1%s1",buf);    
    }
    printf("\n");
  }

  return 0;
}