------------------------ snip -------------------------

/* rot13.c   Bei EBCDIC klappt das natuerlich nicht! */

#include <ctype.h>
#include <stdio.h>

int main()
{
    int c;

    while ((c=getc(stdin))!=EOF)
        putc(islower(c)? 'a'+(c-'a'+13)%26 :
             isupper(c)? 'A'+(c-'A'+13)%26 : c, stdout);
    return 0;
}

------------------------ snip -------------------------

 --
 ARK, 19/Oct/98

 PERMSSN    UID  GID    PACKED    SIZE  RATIO     CRC       STAMP          NAME
---------- ----------- ------- ------- ------ ---------- ------------ -------------
[generic]                  191     272  70.2% -lh5- 79f5 Oct 19  1998 rot13/rot13.c
[generic]                  295     511  57.7% -lh5- 33ec Oct 19  1998 rot13/rot13.readme
---------- ----------- ------- ------- ------ ---------- ------------ -------------
 Total         2 files     486     783  62.1%            Oct 19  1998