/home/users/wolff/EECS382/JAVA> javac cat.java
/home/users/wolff/EECS382/JAVA> java cat -U cat.java
IMPORT JAVA.LANG.*;
IMPORT JAVA.IO.*; 

PUBLIC CLASS CAT {

  PUBLIC STATIC VOID MAIN(STRING[] ARGV) THROWS IOEXCEPTION {
    INT I, ARGC=ARGV.LENGTH;
    BOOLEAN UFLAG=FALSE, FFLAG=FALSE;
    STRING FN = NULL;
    DATAINPUTSTREAM FIN = NULL;

    FOR(I=0; I<ARGC; I++) {
      IF (ARGV[I].EQUALS("-U")) { UFLAG=TRUE; }
      ELSE IF (ARGV[I].CHARAT(0) != '-') { FFLAG=TRUE; FN=NEW STRING(ARGV[I]); }
      ELSE {
        SYSTEM.ERR.PRINTLN("CAT: UNKNOWN FLAG="+ARGV[I]);
        SYSTEM.ERR.CLOSE();
        SYSTEM.EXIT(1);
    } }
    IF (FFLAG) {
      TRY  {
        FIN = NEW DATAINPUTSTREAM(NEW FILEINPUTSTREAM(FN));
      }
      CATCH (EXCEPTION E) {
        SYSTEM.ERR.PRINTLN ("DATAINPUTSTREAM("+FN+") "+E);
        SYSTEM.ERR.CLOSE( ); SYSTEM.EXIT(1);
    } }
    INT C;
    FOR(;;) {
      C=(FFLAG)?FIN.READ():SYSTEM.IN.READ();
      IF (C<0) { BREAK; }
      IF (UFLAG) { C=CHARACTER.TOUPPERCASE((CHAR)C); }
      SYSTEM.OUT.WRITE(C);
    }
    IF (FFLAG) { FIN.CLOSE(); }
  } 
}

/home/users/wolff/EECS382/JAVA>