Cobol

Cobol - tokia programavimo kalba, kuri yra viena iš seniausių kalbų, kokios tik yra šias dienas pasiekusios - sukurta dar 1959 metais, taip kad nesmarkiai teatsilieka nuo Fortran. Pavadinimas gi yra santrumpa nuo "COmmon Business Oriented Language", tipo suprask kad esą verslui skirta.

Šiais laikais Cobol dažniausiai laikoma seniai mirusia, tačiau išties tai nei velnio ji nemirusi, nes kaip gyvavo, taip ir gyvuoja, o laikas nuo laiko net ir naujos versijos pasirodo, kaip kad netgi objektinius navarotus turintis Cobol-2002. Tačiau nors ir nemirusi, Cobol jau maždaug 40 metų visokiems programuotojams varo gilų siaubą, nes tie vis palygina Cobol su kitomis kalbomis ir pakraupsta.

Visokios pabiros apie Cobol

Savo daugeliu bruožų Cobol miglotai primena Lolcode, tiktai yra daug prasčiau struktūruota, iš principo nepritaikyta kompiliavimui, turi įsiūtą kodo modifikavimą ir nepaprastai aktyviai toleruoja Goto. Būtent dėl to Cobol kalboje nesveikai naudoto Goto kažkada koksai tai programuotojas parašė paskui visų programavimo kalbų manifestą, pavadintą "Goto to be considered harmful".

Štai 1997 metais tokia Gartner Group pasauliui skelbė, kad 80% pasaulio finansų sukosi ant Cobol kalba parašytų programų, o aktyviai naudojama buvo maždaug 200 milijardų eilučių kodo (!!!), o negana to, kasmet buvo parašoma dar apie 5 milijardus eilučių. Nuo to laiko Cobol naudojimo dalis gal kažkiek ir sumažėjo, bet visvien tai liko viską lemiančia ir visų nekenčiama programavimo kalba, realiai pakliūnančia į populiariausių (tai nereiškia, kad žinomiausių ar mėgstamiausių) kalbų dešimtuką.

Istoriškai Cobol irgi yra reikšminga kalba, nes būtent joje pirmiausiai atsirado į Algol, o paskui ir į kitas kalbas perėję paprasti loginiai sakiniai, kaip kad visokie ten su IF. Dabar daugeliui keistas dalykas, ale priskyrimo operacijos Cobol kalboje yra ne iš dešinės į kairę (lenkiška notacija), o atvirkščiai - iš kairės į dešinę, kaip įprastoje žmonių kalboje. Pavyzdžiui, tipiškas "Y=Y+X", parašius jį Cobol, būtų toks:

ADD X TO Y

Daugelis mitų apie Cobol, kaip kad pasakojimai apie tai, esą tenai nėra lokalių kintamųjų ar kad tekstą reikia formatuoti, tarpų visokių prirašant - visa tai yra mitologija, atėjusi dar iš laikų, gerokai ankstesnių, negu 1968 metų Cobol standartas. Trumpai tariant, nepasiduokit durninimui.

Cobol kalbos privalumai

Kad ir kaip būtų keikiama, Cobol turi neabejotinų privalumų: jos pramokti nieko nesuprantančiam žmogui yra gerokai lengviau, ji turi labai geras teksto apdirbimo priemones, kai kuriomis duomenų valdymo savybėmis gali lygintis su SQL, o dėl perteklinio verbališkumo yra bene vienintelė kalba, kuria programuojant, praktiškai nereikia komentavimo. Dėl to, kad griežtas Cobol standartas buvo išleistas dar 1968 metais, o ir dėl to, kad ji palaiko griežtą duomenų tipizaciją ir neleidžia išsidirbinėti su rodyklėmis, savo portabilumu ši kalba nenusileidžia Java kalbai (ir beje, nėra kompiuterio, kur ji negalėtų dirbti), tačiau yra daug greitesnė.

Dėl savo seno amžiaus Cobol yra tokia stabili kalba, kad nėra anei jokios tikimybės, kad kokia nors nauja realizacija ims nevirškinti senų programų, o didelėms verslo įmonėms tai yra labai svarbu. Todėl programos, parašytos Cobol prieš 40 metų, vis dar be problemų dirba ir naujuose kompiuteriuose - neretai netgi be minimalių modifikacijų.

Bendrai imant, Cobol daug labiau negu kitos programavimo kalbos primena žmonių kalbą. Cobol naudojamas labai didelis perteklius žodžių, kur lyg ir pakaktų pavienio žodžio, atsiranda daug blevyzgų, tad rašyti teksto tenka daug. Kita vertus, taip rašant, programa būna labai nesunkiai suprantama net ir tiems žmonėms, kurie niekada niekad nieko neprogramavo, o tai kartais yra didelis privalumas. Dar didesnis privalumas yra tame, kad taip žmogiškai atrodančios programos gaunasi save dokumentuojančios.

Gal dėl tokių savybių Cobol ir buvo mėgstama tų, kas programuoti nelabai mėgdavo, tai ir dabar dažniausias variantas, kada Cobol programuoja visai ne kokie programuotojai, o kokie nors vadibybininkai. Užtat paskui visi dar labiau keikia Cobol.

Hello World su Cobol

Cobol tikrai nėra tokia kraupi, kaip kad galima atrasti internetų pavyzdžiuose, kuriuose paimamas koks nors 1960 metų Cobol kodo gabalas, prikaišiotas visokių baisybių, o pasku sakoma, kad esą tasai puslapį teksto užimantis kodo gabalas - tai čia paprasčiausia "Hello World". Viskas žymiai paprasčiau:

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO-WORLD.
PROCEDURE DIVISION.
     DISPLAY 'Hello, world'.
     STOP RUN.

O ir tiesą sakant, įprastame šiuolaikiniame Cobol, tai išvis tebūtų viena eilutė:

DISPLAY "Hello, World".