民初思韻網

加入收藏   設為首頁
選擇語言   簡體中文
你好,請 登陸 或 注冊
首頁 人文思韻 傳奇人物 歷史思潮 時代作品 話題討論 國民思韻 民初捐助 賬戶管理
  搜索  
    人文精神 >>> 創業先鋒 眾人拾柴火焰高
字體    

一個程序員的進化  娛樂
一個程序員的進化 娛樂
CocoaChina     阅读简体中文版

中學


10 PRINT "HELLO WORLD"

20 END


在大學的第一年(大一)


program Hello(input, output)

begin

writeln('Hello World')

end.


在大學的第四年(大四)


(defun hello

(print

(cons 'Hello (list 'World))))


實習生


#include <stdio.h>

void main(void)

{

char *message[] = {"Hello ", "World"};

int i;


for(i = 0; i < 2; ++i)

printf("%s", message[i]);

printf("\n");

}


有經驗的程序員


#include <iostream.h>

#include <string.h>


class string

{

private:

int size;

char *ptr;


string() : size(0), ptr(new char[1]) { ptr[0] = 0; }


string(const string &s) : size(s.size)

{

ptr = new char[size + 1];

strcpy(ptr, s.ptr);

}


~string()

{

delete [] ptr;

}


friend ostream &operator <<(ostream &, const string &);

string &operator=(const char *);

};


ostream &operator<<(ostream &stream, const string &s)

{

return(stream << s.ptr);

}


string &string::operator=(const char *chrs)

{

if (this != &chrs)

{

delete [] ptr;

size = strlen(chrs);

ptr = new char[size + 1];

strcpy(ptr, chrs);

}

return(*this);

}


int main()

{

string str;


str = "Hello World";

cout << str << endl;


return(0);

}


核心程序員


[

uuid(2573F8F4-CFEE-101A-9A9F-00AA00342820)

]

library LHello

{

// bring in the master library

importlib("actimp.tlb");

importlib("actexp.tlb");


// bring in my interfaces

#include "pshlo.idl"


[

uuid(2573F8F5-CFEE-101A-9A9F-00AA00342820)

]

cotype THello

{

interface IHello;

interface IPersistFile;

};

};


[

exe,

uuid(2573F890-CFEE-101A-9A9F-00AA00342820)

]

module CHelloLib

{


// some code related header files

importheader(<windows.h>);

importheader(<ole2.h>);

importheader(<except.hxx>);

importheader("pshlo.h");

importheader("shlo.hxx");

importheader("mycls.hxx");


// needed typelibs

importlib("actimp.tlb");

importlib("actexp.tlb");

importlib("thlo.tlb");


[

uuid(2573F891-CFEE-101A-9A9F-00AA00342820),

aggregatable

]

coclass CHello

{

cotype THello;

};

};



#include "ipfix.hxx"


extern HANDLE hEvent;


class CHello : public CHelloBase

{

public:

IPFIX(CLSID_CHello);


CHello(IUnknown *pUnk);

~CHello();


HRESULT  __stdcall PrintSz(LPWSTR pwszString);


private:

static int cObjRef;

};



#include <windows.h>

#include <ole2.h>

#include <stdio.h>

#include <stdlib.h>

#include "thlo.h"

#include "pshlo.h"

#include "shlo.hxx"

#include "mycls.hxx"


int CHello::cObjRef = 0;


CHello::CHello(IUnknown *pUnk) : CHelloBase(pUnk)

{

cObjRef++;

return;

}


HRESULT  __stdcall  CHello::PrintSz(LPWSTR pwszString)

{

printf("%ws

", pwszString);

return(ResultFromScode(S_OK));

}



CHello::~CHello(void)

{


// when the object count goes to zero, stop the server

cObjRef--;

if( cObjRef == 0 )

PulseEvent(hEvent);


return;

}


#include <windows.h>

#include <ole2.h>

#include "pshlo.h"

#include "shlo.hxx"

#include "mycls.hxx"


HANDLE hEvent;


int _cdecl main(

int argc,

char * argv[]

) {

ULONG ulRef;

DWORD dwRegistration;

CHelloCF *pCF = new CHelloCF();


hEvent = CreateEvent(NULL, FALSE, FALSE, NULL);


// Initialize the OLE libraries

CoInitializeEx(NULL, COINIT_MULTITHREADED);


CoRegisterClassObject(CLSID_CHello, pCF, CLSCTX_LOCAL_SERVER,

REGCLS_MULTIPLEUSE, &dwRegistration);


// wait on an event to stop

WaitForSingleObject(hEvent, INFINITE);


// revoke and release the class object

CoRevokeClassObject(dwRegistration);

ulRef = pCF->Release();


// Tell OLE we are going away.

CoUninitialize();


return(0); }


extern CLSID CLSID_CHello;

extern UUID LIBID_CHelloLib;


CLSID CLSID_CHello = { /* 2573F891-CFEE-101A-9A9F-00AA00342820 */

0x2573F891,

0xCFEE,

0x101A,

{ 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 }

};


UUID LIBID_CHelloLib = { /* 2573F890-CFEE-101A-9A9F-00AA00342820 */

0x2573F890,

0xCFEE,

0x101A,

{ 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 }

};


#include <windows.h>

#include <ole2.h>

#include <stdlib.h>

#include <string.h>

#include <stdio.h>

#include "pshlo.h"

#include "shlo.hxx"

#include "clsid.h"


int _cdecl main(

int argc,

char * argv[]

) {

HRESULT  hRslt;

IHello        *pHello;

ULONG  ulCnt;

IMoniker * pmk;

WCHAR  wcsT[_MAX_PATH];

WCHAR  wcsPath[2 * _MAX_PATH];


// get object path

wcsPath[0] = '\0';

wcsT[0] = '\0';

if( argc > 1) {

mbstowcs(wcsPath, argv[1], strlen(argv[1]) + 1);

wcsupr(wcsPath);

}

else {

fprintf(stderr, "Object path must be specified\n");

return(1);

}


// get print string

if(argc > 2)

mbstowcs(wcsT, argv[2], strlen(argv[2]) + 1);

else

wcscpy(wcsT, L"Hello World");


printf("Linking to object %ws\n", wcsPath);

printf("Text String %ws\n", wcsT);


// Initialize the OLE libraries

hRslt = CoInitializeEx(NULL, COINIT_MULTITHREADED);


if(SUCCEEDED(hRslt)) {



hRslt = CreateFileMoniker(wcsPath, &pmk);

if(SUCCEEDED(hRslt))

hRslt = BindMoniker(pmk, 0, IID_IHello, (void **)&pHello);


if(SUCCEEDED(hRslt)) {


// print a string out

pHello->PrintSz(wcsT);


Sleep(2000);

ulCnt = pHello->Release();

}

else

printf("Failure to connect, status: %lx", hRslt);


// Tell OLE we are going away.

CoUninitialize();

}


return(0);

}


初級黑客


#!/usr/local/bin/perl

$msg="Hello, world.\n";

if ($#ARGV >= 0) {

while(defined($arg=shift(@ARGV))) {

$outfilename = $arg;

open(FILE, ">" . $outfilename) || die "Can't write $arg: $!\n";

print (FILE $msg);

close(FILE) || die "Can't close $arg: $!\n";

}

} else {

print ($msg);

}

1;


有經驗的黑客


#include <stdio.h>

#define S "Hello, World\n"

main(){exit(printf(S) == strlen(S) ? 0 : 1);}


經驗豐富的黑客


% cc -o a.out ~/src/misc/hw/hw.c


% a.out


大師級別的黑客


% echo "Hello, world."


升職為經理


10 PRINT "HELLO WORLD"

20 END


中級經理


mail -s "Hello, world." bob@b12

Bob, could you please write me a program that prints "Hello, world."?

I need it by tomorrow.

^D


高級經理


% zmail jim

I need a "Hello, world." program by this afternoon.


首席執行官/CEO


% letter


letter: Command not found.

% mail

To: ^X ^F ^C

% help mail

help: Command not found.

% damn!

!: Event unrecognized

% logout


說說你現在進化到哪一步了。

本文由IT江湖 翻譯自 Ariel

2015-08-23 08:55

歡迎訂閱我們的微信公眾賬號!
春秋茶館訂閱號
微信號 season-tea(春秋茶館)
每天分享一篇科技/遊戲/人文類的資訊,點綴生活,啟迪思想,探討古典韻味。
  清末民初歷史人物  民初人物
教育專家大學思想啟蒙
蔡元培(1868年1月11日-1940年3月5日),字鶴卿,又字仲申、民友、孑民,乳名阿培,並曾化名蔡振、周子餘,浙江紹興山陰縣(今紹興縣)人,革命家、教育家、政治家。中....
散文大家曠達風趣
梁實秋(1903年1月6日-1987年11月3日),號均默,原名梁治華,字實秋,筆名子佳、秋郎,程淑等,中國著名的散文家、學者、文學批評家、翻譯家,華人世界第一個研究莎士....
資助民初精神網
        回頂部     寫評論

 
評論集
暫無評論!
發表評論歡迎你的評論
昵稱:     登陸  註冊
主頁:  
郵箱:  (僅管理員可見)

驗證:   验证码(不區分大小寫)  
© 2011   民初思韻網-清末民初傳奇時代的發現與復興   版權所有   加入收藏    設為首頁    聯繫我們    1616導航