jmsdnns/webbol: A minimal static web server written in COBOL1
https://github.com/jmsdnns/webbol/tree/mainAcknowledgments
Built with GnuCOBOL, demonstrating that COBOL can still be used for modern systems programming tasks.
居然写的是 Web 服务器,也不知道是什么神人写的。我以为这语言除了守旧的银行还在使用以外早死翘翘了。
看了一眼语法,我个人很难接受:
- 全大写?
- 大量重复的变量名
- 赋值语法繁琐:MOVE "text/html" TO LS-MIME-TYPE
- 没有 switch-case大量if:url-decode.cbl#L91
- 函数调用过于麻烦:CALL "socket" USING BY VALUE 2 BY VALUE 1 BY VALUE 0webserver.cbl#L51
一堆 BY VALUE、BY REFERENCE 让我想起初学 VB6 的时候的恐惧。
难以想像那个时候的 C 语言的出现是多么的耳目一新、多么的惊艳。