一个程序员的进化

本文由 IT江湖 翻译自 Ariel。

• 中学
  
  Java

  10 PRINT "HELLO WORLD" 20 END

  1 2	10 PRINT "HELLO WORLD" 20 END

• 在大学的第一年（大一）
  
  Java

  program Hello(input, output) begin writeln('Hello World') end.

  1 2 3 4

  program Hello ( input , output )      begin        writeln ( 'Hello World' )      end .

• 在大学的第四年（大四）
  
  Java

  (defun hello (print (cons 'Hello (list 'World))))

  1 2 3

  ( defun hello      ( print        ( cons 'Hello (list ' World ) ) ) )

• 实习生
  
  Java

  #include <stdio.h> void main(void) { char *message[] = {"Hello ", "World"}; int i; for(i = 0; i < 2; ++i) printf("%s", message[i]); printf("\n"); }

  1 2 3 4 5 6 7 8 9 10

  # include < stdio . h > void main ( void ) {    char * message [ ] = { "Hello " , "World" } ;    int i ;    for ( i = 0 ; i < 2 ; ++ i )      printf ( "%s" , message [ i ] ) ;    printf ( "\n" ) ; }

• 有经验的程序员
  
  C

  #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); }

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52

  #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 ) ;    }

• 核心程序员
  
  C

  [ 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); }

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229

  [    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 ) ;    }

• 初级黑客
  
  C

  #!/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;

  1 2 3 4 5 6 7 8 9 10 11 12 13

  #!/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 ;

• 有经验的黑客
  
  C

  #include <stdio.h> #define S "Hello, World\n" main(){exit(printf(S) == strlen(S) ? 0 : 1);}

  1 2 3

  #include <stdio.h>    #define S "Hello, World\n"    main ( ) { exit ( printf ( S ) == strlen ( S ) ? 0 : 1 ) ; }

• 经验丰富的黑客
  
  C

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

  1 2 3

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

• 大师级别的黑客
  
  1С (Код)

  % echo "Hello, world."

  1	% echo "Hello, world."

• 升值为经理
  
  Java

  10 PRINT "HELLO WORLD" 20 END

  1 2	10 PRINT "HELLO WORLD" 20 END

• 中级经理
  
  Java

  mail -s "Hello, world." bob@b12 Bob, could you please write me a program that prints "Hello, world."? I need it by tomorrow. ^D

  1 2 3 4

  mail - s "Hello, world." bob @b12    Bob , could you please write me a program that prints "Hello, world." ?    I need it by tomorrow .    ^ D

• 高级经理
  
  Java

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

  1 2	% zmail jim    I need a "Hello, world." program by this afternoon .

• 首席执行官/CEO
  
  Java

  % letter letter: Command not found. % mail To: ^X ^F ^C % help mail help: Command not found. % damn! !: Event unrecognized % logout

  1 2 3 4 5 6 7 8 9 10

  % letter      letter : Command not found .    % mail    To : ^ X ^ F ^ C    % help mail    help : Command not found .    % damn !    ! : Event unrecognized    % logout