The Evolution of a Programmer

By -

High School/Jr.High
  10 PRINT "HELLO WORLD"
  20 END
First year in College
  program Hello(input, output)
    begin
      writeln('Hello World')
    end.

Senior year in College
  (defun hello
    (print
      (cons 'Hello (list 'World))))

New professional
  #include
  void main(void)
  {
    char *message[] = {"Hello ", "World"};
    int i;

    for(i = 0; i < 2; ++i)
      printf("%s", message[i]);
    printf("\n");
  }

Seasoned professional
  #include
  #include

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

Master Programmer
  [
  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();
      importheader();
      importheader();
      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
  #include
  #include
  #include
  #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
  #include
  #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
  #include
  #include
  #include
  #include
  #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);
  }

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

Experienced Hacker
  #include
  #define S "Hello, World\n"
  main(){exit(printf(S) == strlen(S) ? 0 : 1);}

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

Guru Hacker
  % echo "Hello, world."

New Manager
  10 PRINT "HELLO WORLD"
  20 END

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

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

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

Comments

Post a Comment

Popular posts from this blog

Smart Storage Tips for a Clutter Free Bedroom

By -
Image
The  bedroom  is the area in the house that is more personal and private. One spends most of his time inside the bedroom especially when much rest is needed. Hence, since it is a personal room, one’s belongings and important stuff including clothes, jewelries and others are also inside it. There would be a need to organize all the things inside the bedroom in order to make it clutter free. It is also necessary to do that so that you will not find it hard to look for your own stuff. There are many ways to create storage spaces in your bedroom. Choosing one depends on the type of room you have and it also depends on your storage needs. Today, we will give you some tips on how to create  smart storage space  in your bedroom to have a  clutter free room . Look into the tips below and choose which one best suits you. 1. Open storage. Image:  Vhychenq Try for open storage especially if your bedroom is only small. Place some items on it like some displays, books and others. Lo
Read more

29 Semi-Productive Things I Do Online When I’m Trying to Avoid Real Work

By -
You don’t always have to work hard to be productive.  Productivity can simply be the side effect of doing the right things. So here’s a list of 29 semi-productive things I do online when my mind is set on avoiding ‘real work.’ Check delicious popular tags like ‘ useful ,’ ‘ tutorials ,’ ‘ tips ,’ ‘howto ,’ ‘ advice ,’ ‘ entrepreneurship ,’ etc. for interesting, educational articles to read. Watch one of the thousands of educational videos streaming at TED.com , Academic Earth and Teacher Tube . Read an online book list and find a new book to grab next time I’m at the library.  Here’s another list .  And another .  And another . Read a classic book online for free at Project Gutenberg , Planet eBook , or the E-books Directory . Research a new Do It Yourself project at DIY Network , Instructables , eHow , or WikiHow . Add to, delete from, or just generally sort my ongoing to-do list at Remember The Milk . Create a cool graphical mind map of some of my recent ideas at bubbl.us .
Read more

Top 5 Most Alcoholic Drinks (Cocktails)

By -
Image
5 Strongest Drinks Mixed Drink Recipes #5: The Long Island Ice Tea. This one is a classic. I can remember the first time a friend introduced me to this. After three I was laughing because they were so smooth then I stood up. Then something happened (obvious censoring) and everyone laughed at me for months after. Good times. The Long Island Ice Tea was long the king (queen?) of all strong alcoholic mixed drinks, and still deserves a place on the list. Recipe: 1 shot of vodka, 1 shot of rum, 1 shot of gin, 1 shot of gin, 1 shot of triple sec, 1 lemon, coke. Fill a cocktail shaker with ice add the spirits into the cocktail shaker. Squeeze a fresh lemon into the shaker as well. Put the lid on and shake, add to a tall glass then add lots of ice before slowly pouring the coke on top of the ice. Note: many bartenders will make a weaker version with only half a shot of each. #4: Irish Car Bomb. Many versions of this have a ½ shot of whiskey mixed with a ½ shot of Irish Crea
Read more