…un verano ENORME

Homenaje hoy a todos los que nos dedicamos a darle al código. Este documento que os presento refleja perfectamente como a medida que vas incrementando tus conocimientos también incrementas las ganas de complicarte la vida y cuando estás en la cúspide como gurú informático te das cuenta de las cosas más sencillas suelen ser las más efectivas.

Para todos los programadores este es vuestro tributo….

Nota: Algunos símbolos han sido omitidos por conflictos con el editor del blog. 

En el instituto…
==========
10 PRINT “HOLA MUNDO”
20 END

Tu primer año en la universidad…
=====================
  program Hola(input, output)
    begin
      writeln(’Hola Mundo’)
    end.

Tu último año de carrera
================
  (defun hello
    (print
      (cons ‘Hola (list ‘Mundo))))

Ya eres profesional…
==============
#include stdio.h

void main(void)
{
    char *message[] = {”Hola “, “Mundo”};
    int i;
    for(i = 0; i < 2; ++i)
        printf(”%s”, message[i]);
        printf(”\n”);
    }

Profesional con experiencia…
===================
#include iostream.h
#include string.h

class string
{
private:
  int size;
  char *ptr;
public:
   string() : size(0), ptr(new char(’\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 = “Hola Mundo”;
    cout << str << endl;
    return(0);
}

Empiezas tu andadura como Hacker
=======================
#!/usr/local/bin/perl
$msg=”Hola mundo.\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;

Ya eres todo un Hacker
===============
#include stdio.h
#define S “Hola Mundo\n”
main(){exit(printf(S) == strlen(S) ? 0 : 1);}

Por fin un Hacker experimentado
=====================
% cc -o a.out ~/src/misc/hw/hw.c
% a.out

Guru Hacker
========
% cat
Hola Mundo.
^D

Has llegado a encargado…
=================
10 PRINT “HOLA MUNDO”
20 END

Encargado de media categoria
===================

mail -s “Hola Mundo.” paquitillo@hotmail.com
Paquitillo, necesito que me escribas un programa que muestre por pantalla ”Hola Mundo.”?
Lo necesito para mañana.
^D

Encargado jefe
==========
% zmail paquitillo
Necesito un programa ”Hola Mundo.” para esta tarde.

Alto ejecutivo (mhh… demasiado tiempo sin tocar tecla)
====================================
% letter
letter: Command not found.
% mail
To: ^X ^F ^C
% help mail
help: Command not found.
% damn!
!: Event unrecognized
% logout

Escroto_Roto(^_^)! End