#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
int main(int argc, char **argv)
{
  int c, lastc;
  static char key[128], *s;
  // a60 case stropping
  for (;;) {
    c = fgetc(stdin);
    for (;;) {
      if (c == EOF) {
        exit(0);
      }
      if (c == '\'') {
        // lc-strop
        s = key;
        for (;;) {
          c = fgetc(stdin);
          if (c == '\'') break;
          if (isalpha(c) && isupper(c)) c = tolower(c);
          putchar(c); *s++ = c;
	}
        *s = '\0';
        // may need a ';' *before* "end"???
        if (strcmp(key, "comment") == 0) {
          do {
            c = fgetc(stdin); putchar(c);
	  } while (c != ';');
        } else if (strcmp(key, "begin") == 0) {
 	  // output ';'
	} else break;
        c = lastc = ';';
      }
      if (c == '"') {
        // string
        do {
          putchar(c); c = fgetc(stdin);
	} while (c != '"');
      }
      if (isblank(c)) break;
      if (c == '\n') {
	//        if (lastc == ';') break;
	//        c = ';';
        break;
      }
      if (isalpha(c) && islower(c)) c = toupper(c);
      putchar(c);
      lastc = c;
      c = fgetc(stdin);
    }
  }

}