COBOL是那些你不断听到的语言之一,是过去的遗迹之一。
事实证明,它是使世界运转的语言,特别是在银行和金融机构。我在某处读到,超过70%的商业交易是通过COBOL编写的程序进行的。
这有各种原因。首先,这种语言是为这种使用情况设计的。
毕竟,它被称为面向商业的COBOL语言。
作为一个名字,这有点无聊。但它直奔主题。
另一个原因是,它很老了。它设计于1959年,从一开始就被用来制作那些系统,没有人会去改变那些运行良好的程序。
那些程序是如此重要,以至于它们只是被维护和改进,但从未从头开始重写过。
总之,你可以在维基百科上阅读关于COBOL的历史。这里的目的是对这门语言做一个快速的介绍,这样你下次听到COBOL的时候,就知道它是什么样子了。
安装GNU COBOL编译器
安装gnu-cobol
。
在Mac上,使用Homebrew。
或使用任何你能在你的操作系统上安装GNU命令的方法(提示:Homebrew也能在Win/Linux上使用)。
一旦完成这些,你就可以访问cobc
命令。
这是它的手册页面。
man cobc
我在网上找到的一些说明涉及到安装一个IDE(集成开发环境),但你不需要一个IDE来测试。
把你的COBOL程序写在一个.cob
文件中,然后用以下方法编译它
cobc -x <filename>.cob
编写COBOL Hello, World!
我创建了一个hello.cob
文件并在VS Code中打开了它。立即有一个弹出窗口告诉我一些扩展可以帮助.cob
文件。我很感动。
我准备安装第一个也是最流行的,名为COBOL的扩展,以提供语法突出显示。
现在将这段代码添加到hello.cob
文件中。
HELLO
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
PROCEDURE DIVISION.
DISPLAY "Hello, World!".
STOP RUN.
从命令行中编译它。
cobc -x hello.cob
然后运行生成的二进制文件。
./hello
这很简单。
将从用户那里收到的两个数字相加
现在创建一个sum.cob
文件。
HELLO
IDENTIFICATION DIVISION.
PROGRAM-ID. ADDITION.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 NUM_1 PIC 9(4).
77 NUM_2 PIC 9(4).
77 SOLVE_SUM PIC 9(4).
PROCEDURE DIVISION.
PARA.
DISPLAY "First number: ".
ACCEPT NUM_1.
DISPLAY "Second number: ".
ACCEPT NUM_2.
COMPUTE SOLVE_SUM = NUM_1 + NUM_2.
DISPLAY "Sum: " SOLVE_SUM.
STOP RUN.
编译它。
cobc -x sum.cob
运行它。
./sum
并要求你提供2个数字,然后程序会计算出总和。
注意,我不知道这些程序是如何运行的,指令的含义,但我只是想试试。
我想这就是我这辈子要写的所有COBOL。