No real programmer would ever use PHP

[jcsike]

Top 10 Ways to Provoke a Geek Argument
http://www.wired.com/geekdad/2009/06...geek-argument/

10. ?No real programmer would ever use PHP.? - This won?t work for every geek, of course, but for those it works on, it should work really well.

9. ?Comic books are just for kids!? - I?m sure you?ve heard this one before?I know I certainly heard it often enough in high school, and even though it?s even less true now than it was then, I?m sure comic book afficionados still hear it today.

8. ?Role-playing games are just for people who can?t deal with real life.? - There are, sadly, still a lot of people who think anyone who plays D&D must live in his parents? basement and bathe once a month. Such people must be put straight, and immediately!

7. ?The Pirates of the Caribbean movies are so realistic!? - I doubt many people actually believe this, but there are an awful lot of misconceptions about pirates out there, so you never know.

6. ?Yeah, I got an Xbox 360 so my daughter could play Hello Kitty games. Is it really good for anything else?? - We?ve hit the ones that are hard for me even to type, now?

5. ?Mac, Windows, or Linux? Does it really make a difference?? - An argument so old its original form was probably first written down in hieroglyphs, I know, but I don?t know a single geek it wouldn?t work on?myself included.

4. ?The Ewoks were the best thing about the original Star Wars trilogy.? / ?Greedo shot first!? - I couldn?t decide between the two. If one doesn?t work, I?ll bet the other one would.

3. ?Tolkien? Ehhh, I prefer Terry Brooks!? - I almost feel like I should argue with myself just for writing that. I?m going to let the top two stand for themselves.

2. ?Joss Whedon is a hack!?

1. ?I don?t see what?s so bad about DRM!?

[art914]

Top 10 Ways to Provoke a Geek Argument
http://www.wired.com/geekdad/2009/06...geek-argument/

10. ?No real programmer would ever use PHP.? - This won?t work for every geek, of course, but for those it works on, it should work really well.

9. ?Comic books are just for kids!? - I?m sure you?ve heard this one before?I know I certainly heard it often enough in high school, and even though it?s even less true now than it was then, I?m sure comic book afficionados still hear it today.

8. ?Role-playing games are just for people who can?t deal with real life.? - There are, sadly, still a lot of people who think anyone who plays D&D must live in his parents? basement and bathe once a month. Such people must be put straight, and immediately!

7. ?The Pirates of the Caribbean movies are so realistic!? - I doubt many people actually believe this, but there are an awful lot of misconceptions about pirates out there, so you never know.

6. ?Yeah, I got an Xbox 360 so my daughter could play Hello Kitty games. Is it really good for anything else?? - We?ve hit the ones that are hard for me even to type, now?

5. ?Mac, Windows, or Linux? Does it really make a difference?? - An argument so old its original form was probably first written down in hieroglyphs, I know, but I don?t know a single geek it wouldn?t work on?myself included.

4. ?The Ewoks were the best thing about the original Star Wars trilogy.? / ?Greedo shot first!? - I couldn?t decide between the two. If one doesn?t work, I?ll bet the other one would.

3. ?Tolkien? Ehhh, I prefer Terry Brooks!? - I almost feel like I should argue with myself just for writing that. I?m going to let the top two stand for themselves.

2. ?Joss Whedon is a hack!?

1. ?I don?t see what?s so bad about DRM!?

[u-Bob]

had to google "Joss Whedon"

[Killswitch - BANNED FOR LIFE]

You got me, I saw the thread title and got out my sword and shield ready for battle.

[JamesK]

You got me, I saw the thread title and got out my sword and shield ready for battle.

[qxm]

I use them sexy C++ n C# YO ... ... php is just .... skanky!

[HomerSimpson]

10 easy ways to start up a geek fight with just one sentence.

[woj]

nice thread title

[EuroRevenueUSA]

Awesome, that is fucking hilarious

[Killswitch - BANNED FOR LIFE]

I got PHP's back until the end yo.

[GrouchyAdmin]

Pie is better than cake.

[$5 submissions]

Thread title got me to click

[brassmonkey]

well ok then

[sysk]

my blood is boiling

[sysk]

I would include:
- Ruby on Rails doesn't scale
- Why would I use CSS and when I can use tables...
- I hired a social media guru with over 10 yrs experience
- Open source is not secure
- I will switch back from FF to IE8

[CunningStunt]

Lmfao, that PHP one is going to get a few people's backs up.

[CrkMStanz]

2. ?Joss Whedon is a hack!?

WTF!!!??!?!

blasphemous heathen

dems fightin' words

u and me - out back - 10 minutes.... grrrrrrr

[gornyhuy]

Awesome list...

[mikesouth]

Thats genius

[MediaGuy]

I would include:
- Ruby on Rails doesn't scale
- Why would I use CSS and when I can use tables...
- I hired a social media guru with over 10 yrs experience
- Open source is not secure
- I will switch back from FF to IE8

Except the FF/IE8 thing.... Chrome will destroy you all...


:D

[Iron Fist]

"Online chatrooms are for pedophiles"

Serious business.

[jcsike]

nice thread title

thanks man

[nation-x]

I got PHP's back until the end yo.

[milambur]

Yeah, php is for pussies, here is some simple GEEK code I wrote when I was in highschool:

PROGRAM MandelBrot;
USES Crt,Dos;
CONST
  VGASegment = $0A000;
  xres = 160;
  yres = 100;
VAR
 i,x,y   : Integer;
 ch      : Char;
 a,b,ao,
 bo,abs  : Real;

PROCEDURE InitGraph(k : Byte);         {Inits Graph/Textmode}
VAR
  g : Byte;
BEGIN
  CASE k OF
    1 : g := $03;     {Inits 80x25 Textmode}
    2 : g := $13;     {Inits 320x200x256 Graphmode}
    3 : g := $12;     {Inits 640x480x16 Graphmode}
  END;

  ASM
    MOV AH,$00
    MOV AL,g
    INT $10           {Inits new mode}
  END;
END;

PROCEDURE PutPixel(x,y : Word; col : Byte);
VAR
  Mempos : Word;
BEGIN
  Mempos := (y-1)*320 + (x-1);
  Mem[VGASegment:Mempos] := col; {Givs memory position mempos the value of col}
END;


{PROCEDURE PutPixel(x,y : Word; col : Byte);
BEGIN
  ASM
    MOV AH,$0C
    MOV AL,col
    MOV CX,x
    MOV DX,y
    INT $10
  END;
END;}

BEGIN
{  ASM
    MOV AX,$4F02
    MOV BX,$101
    INT $10
  END;}
  InitGraph(2);
  FOR x := -xres TO xres DO
    FOR y := -yres TO 0 DO BEGIN
      a := x/50;
      b := y/50;
      i := 1;
      REPEAT
        abs := a*a+b*b;
        IF abs > 4 THEN BEGIN
          PutPixel(x+xres,y+yres,i+16);
          PutPixel(x+xres,yres-y,i+16);
        END
        ELSE BEGIN
          ao := a;
          bo := b;
          a := ao*ao-bo*bo+x/50;
          b := 2*ao*bo+y/50;
          Inc(i);
        END;
      UNTIL  (i = 100) OR (abs > 4);
    END;
  ch := ReadKey;
END.

code   SEGMENT para PUBLIC 'code'
       ASSUME cs:code
       LOCALS
       .386

       JMP Main

InitG  PROC NEAR

       INT  10

       RET
       ENDP

Random PROC NEAR
       MOV  EAX,1107030247
       MOV  EBX,DS:seed
       MUL  EBX
       ADD  EAX,97177
       MOV  DS:seed,EAX
       SHR  EAX,15
       AND  AX,8191
       RET
       ENDP

StartV PROC NEAR
       MOV  CX,70

pix1:  CALL Random
       MOV  BX,41
       DIV  BX
       MOV  SI,CX
       ADD  SI,100
       MOV  DS:[SI],AX
       LOOP pix1

       MOV  CX,70
pix2:  CALL Random
       MOV  BX,26
       DIV  BX
       MOV  SI,CX
       ADD  SI,200
       MOV  DS:[SI],AX
       LOOP pix2

       RET
       ENDP

Scroll PROC NEAR
       MOV  CX,70
Ppix:  MOV  SI,CX
       MOV  AX,DS:[SI+100]
       INC  AX
       MOV  DS:[SI],AX
       DEC  AX
       MOV  BX,DS:[SI+200]
       INC  BX
       MOV  DS:[SI],BX
       DEC  BX
       MUL  BX
       MOV  SI,AX
       MOV  BX,15
       MOV  0A000h:[SI],BX
       LOOP Ppix


       RET
       ENDP

Main   PROC NEAR
       MOV  AH,13h
       CALL InitG
       CALL StartV
       CALL Ppix
       MOV  AH,06h
       MOV  DL,0FFh
       INT  21h
       MOV  AH,3
       CALL InitG
       ENDP

seed   dd  0

code   ENDS
       END

CONST
  VGASegment = $0A000;

VAR
  x,y : Integer;

PROCEDURE SetColor(color,R,G,B:Byte);
BEGIN
	Port[$3C8] := color;
	Port[$3C9] := R;
	Port[$3C9] := G;
	Port[$3C9] := B;
END;

PROCEDURE InitGraph(k : Byte);         {Inits Graph/Textmode}
VAR
  g : Byte;
BEGIN
  CASE k OF
    1 : g := $03;     {Inits 80x25 Textmode}
    2 : g := $13;     {Inits 320x200x256 Graphmode}
    3 : g := $12;     {Inits 640x480x16 Graphmode}
  END;

  ASM
    MOV AH,$00
    MOV AL,g
    INT $10           {Inits new mode}
  END;
END;

PROCEDURE InitVESAGraph(k : Byte);
VAR
  g : Word;
BEGIN
  CASE k OF
    1 : g := $100;              {640*400*256}
    2 : g := $101;              {640*480*256}
    3 : g := $102;              {800*600*16}
    4 : g := $103;              {800*600*256}
    5 : g := $104;              {1024*768*16}
    6 : g := $105;              {1024*768*256}
    7 : g := $106;              {1280*1024*16}
    8 : g := $107;              {1280*1024*256}
  END;
  ASM
    MOV AX,$4F02
    MOV BX,g
    MOV CX,0
    MOV DX,0
    INT $10
    MOV g,AX
  END;
  Write(g);
END;

PROCEDURE PutPixel(x,y : Word; col : Byte);
VAR
  Mempos : Word;
BEGIN
  IF (x > 1) AND (x < 321) AND (y > 1) AND (y < 201) THEN BEGIN
    Mempos := (y-1)*320 + (x-1);
    Mem[VGASegment:Mempos] := col; {Givs memory position mempos the value of col}
  END;
END;

PROCEDURE PutPixelAG(x,y : Word; Col : Byte);
BEGIN
  ASM
    MOV AH,$0C
    MOV AL,Col
    MOV CX,x
    MOV DX,y
    INT $10
  END;
END;

PROCEDURE PutPixelVESA(x,y : Word; col : Byte);
BEGIN

END;

PROCEDURE ClearScr;
BEGIN
  FOR i := 1 TO 64000 DO
    Mem[$A000:i] := 0;
END;

FUNCTION GetPixelAG(x,y : Word) : Byte;
VAR
  g : Byte;
BEGIN
  ASM
    MOV AH,$0D
    MOV CX,x
    MOV DX,y
    INT $10
    MOV g,AL
  END;
  GetPixelAG := g;
END;

FUNCTION GetPixel(x,y : Word) : Byte;
VAR
  Mempos : Word;
BEGIN
  IF (x > 1) AND (x < 321) AND (y > 1) AND (y < 201) THEN BEGIN
    Mempos := (y-1)*320 + (x-1);
    GetPixel := Mem[VGASegment:Mempos]; {Givs memory position mempos the value of col}
  END
  ELSE
    GetPixel := 0;
END;

PROCEDURE WriteString(x,y : Byte; col : Byte; s : STRING; bi : Boolean);
VAR
  g : Byte;
BEGIN
  ASM
    MOV AH,$02
    MOV DH,y
    MOV DL,x
    MOV BH,$0
    INT $10
  END;
  FOR i := 1 TO Length(s) DO BEGIN
    g := Ord(s[i]);
    ASM
      MOV AH,$0E
      MOV AL,g
      MOV BL,col
      INT $10
    END;
    IF bi THEN BEGIN
    {  Sound(1000);
      Delay(15);
      NoSound;
      Delay(30);}
    END;
  END;
END;

PROCEDURE LoadImage(s : STRING);
VAR
  pix   : FILE;
  R,G,B : Byte;
  ext   : Word;

BEGIN
  Assign(pix,s);
  Reset(pix,1);
  FOR i := 1 TO 10 DO
    BlockRead(pix,ch,SizeOf(ch));

  FOR i := 0 TO 255 DO BEGIN
    BlockRead(pix,ch,SizeOf(ch));
    R := Ord(ch);
    BlockRead(pix,ch,SizeOf(ch));
    G := Ord(ch);
    BlockRead(pix,ch,SizeOf(ch));
    B := Ord(ch);
    SetColor(i,R,G,B);
  END;

  BlockRead(pix,Mem[$A000:0],$FA00);
 { Move(Mem[$9000:0],Mem[$A000:0],$FA00);

  ext := EMBGetMem(64);
  MoveToEMB(Mem[$A000:0],ext,$FA00);
  ClearScr;
  ch := ReadKey;
  MoveFromEMB(ext,Mem[$A000:0],$FA00);}
END;

PROCEDURE ReadPCX(s : String);
VAR
  image   : ARRAY[1..64000] OF Byte;
  pic     : FILE;
  n       : Integer;
  k,R,G,B : Byte;

BEGIN
  Assign(pic,s);
  Reset(pic,1);

  FOR i := 0 TO 255 DO
    SetColor(i,0,0,0);

  FOR i := 1 TO 128 DO
    BlockRead(pic,k,SizeOf(k));

  i:=0;
    REPEAT
      Blockread(pic,k,SizeOf(k));
        k := k AND $FF;
        IF (k AND $C0) = $C0 THEN BEGIN
          n := k AND $3F;
          Blockread(pic,k,SizeOf(k));
          FOR R := 1 TO n DO BEGIN
            Mem[$A000:(y-1)*320+x] := k;
            Inc(x);
          END;
        END
        ELSE BEGIN
          Mem[$A000:(y-1)*320+x] := k;
          Inc(x);
        END;
    UNTIL x>=64000 ;

    BlockRead(pic,ch,SizeOf(ch));

  FOR i := 0 TO 255 DO BEGIN
    BlockRead(pic,R,SizeOf(R));
    R := R SHR 2;
    BlockRead(pic,G,SizeOf(G));
    G := G SHR 2;
    BlockRead(pic,B,SizeOf(B));
    B := B SHR 2;
    SetColor(i,R,G,B);
  END;
{  Move(Mem[$9000:0],Mem[$A000:0],$FA00);}

  Close(pic);
END;

[AdultSoftwareSolutions]

A real programmer creates his own programming languages specific to the job he needs to get done. Having created several programming languages I would have to say PHP is one of the worst I have ever come across.

[MakesYouClick]

Intriguing title

[psili]

Pft... that's ghey. Here's the real shizznit.

repeat 4 [forward 50 right 90]

Turtle FTW!

Yeah, php is for pussies, here is some simple GEEK code I wrote when I was in highschool:

PROGRAM MandelBrot;
USES Crt,Dos;
CONST
  VGASegment = $0A000;
  xres = 160;
  yres = 100;
VAR
 i,x,y   : Integer;
 ch      : Char;
 a,b,ao,
 bo,abs  : Real;

PROCEDURE InitGraph(k : Byte);         {Inits Graph/Textmode}
VAR
  g : Byte;
BEGIN
  CASE k OF
    1 : g := $03;     {Inits 80x25 Textmode}
    2 : g := $13;     {Inits 320x200x256 Graphmode}
    3 : g := $12;     {Inits 640x480x16 Graphmode}
  END;

  ASM
    MOV AH,$00
    MOV AL,g
    INT $10           {Inits new mode}
  END;
END;

PROCEDURE PutPixel(x,y : Word; col : Byte);
VAR
  Mempos : Word;
BEGIN
  Mempos := (y-1)*320 + (x-1);
  Mem[VGASegment:Mempos] := col; {Givs memory position mempos the value of col}
END;


{PROCEDURE PutPixel(x,y : Word; col : Byte);
BEGIN
  ASM
    MOV AH,$0C
    MOV AL,col
    MOV CX,x
    MOV DX,y
    INT $10
  END;
END;}

BEGIN
{  ASM
    MOV AX,$4F02
    MOV BX,$101
    INT $10
  END;}
  InitGraph(2);
  FOR x := -xres TO xres DO
    FOR y := -yres TO 0 DO BEGIN
      a := x/50;
      b := y/50;
      i := 1;
      REPEAT
        abs := a*a+b*b;
        IF abs > 4 THEN BEGIN
          PutPixel(x+xres,y+yres,i+16);
          PutPixel(x+xres,yres-y,i+16);
        END
        ELSE BEGIN
          ao := a;
          bo := b;
          a := ao*ao-bo*bo+x/50;
          b := 2*ao*bo+y/50;
          Inc(i);
        END;
      UNTIL  (i = 100) OR (abs > 4);
    END;
  ch := ReadKey;
END.

code   SEGMENT para PUBLIC 'code'
       ASSUME cs:code
       LOCALS
       .386

       JMP Main

InitG  PROC NEAR

       INT  10

       RET
       ENDP

Random PROC NEAR
       MOV  EAX,1107030247
       MOV  EBX,DS:seed
       MUL  EBX
       ADD  EAX,97177
       MOV  DS:seed,EAX
       SHR  EAX,15
       AND  AX,8191
       RET
       ENDP

StartV PROC NEAR
       MOV  CX,70

pix1:  CALL Random
       MOV  BX,41
       DIV  BX
       MOV  SI,CX
       ADD  SI,100
       MOV  DS:[SI],AX
       LOOP pix1

       MOV  CX,70
pix2:  CALL Random
       MOV  BX,26
       DIV  BX
       MOV  SI,CX
       ADD  SI,200
       MOV  DS:[SI],AX
       LOOP pix2

       RET
       ENDP

Scroll PROC NEAR
       MOV  CX,70
Ppix:  MOV  SI,CX
       MOV  AX,DS:[SI+100]
       INC  AX
       MOV  DS:[SI],AX
       DEC  AX
       MOV  BX,DS:[SI+200]
       INC  BX
       MOV  DS:[SI],BX
       DEC  BX
       MUL  BX
       MOV  SI,AX
       MOV  BX,15
       MOV  0A000h:[SI],BX
       LOOP Ppix


       RET
       ENDP

Main   PROC NEAR
       MOV  AH,13h
       CALL InitG
       CALL StartV
       CALL Ppix
       MOV  AH,06h
       MOV  DL,0FFh
       INT  21h
       MOV  AH,3
       CALL InitG
       ENDP

seed   dd  0

code   ENDS
       END

CONST
  VGASegment = $0A000;

VAR
  x,y : Integer;

PROCEDURE SetColor(color,R,G,B:Byte);
BEGIN
	Port[$3C8] := color;
	Port[$3C9] := R;
	Port[$3C9] := G;
	Port[$3C9] := B;
END;

PROCEDURE InitGraph(k : Byte);         {Inits Graph/Textmode}
VAR
  g : Byte;
BEGIN
  CASE k OF
    1 : g := $03;     {Inits 80x25 Textmode}
    2 : g := $13;     {Inits 320x200x256 Graphmode}
    3 : g := $12;     {Inits 640x480x16 Graphmode}
  END;

  ASM
    MOV AH,$00
    MOV AL,g
    INT $10           {Inits new mode}
  END;
END;

PROCEDURE InitVESAGraph(k : Byte);
VAR
  g : Word;
BEGIN
  CASE k OF
    1 : g := $100;              {640*400*256}
    2 : g := $101;              {640*480*256}
    3 : g := $102;              {800*600*16}
    4 : g := $103;              {800*600*256}
    5 : g := $104;              {1024*768*16}
    6 : g := $105;              {1024*768*256}
    7 : g := $106;              {1280*1024*16}
    8 : g := $107;              {1280*1024*256}
  END;
  ASM
    MOV AX,$4F02
    MOV BX,g
    MOV CX,0
    MOV DX,0
    INT $10
    MOV g,AX
  END;
  Write(g);
END;

PROCEDURE PutPixel(x,y : Word; col : Byte);
VAR
  Mempos : Word;
BEGIN
  IF (x > 1) AND (x < 321) AND (y > 1) AND (y < 201) THEN BEGIN
    Mempos := (y-1)*320 + (x-1);
    Mem[VGASegment:Mempos] := col; {Givs memory position mempos the value of col}
  END;
END;

PROCEDURE PutPixelAG(x,y : Word; Col : Byte);
BEGIN
  ASM
    MOV AH,$0C
    MOV AL,Col
    MOV CX,x
    MOV DX,y
    INT $10
  END;
END;

PROCEDURE PutPixelVESA(x,y : Word; col : Byte);
BEGIN

END;

PROCEDURE ClearScr;
BEGIN
  FOR i := 1 TO 64000 DO
    Mem[$A000:i] := 0;
END;

FUNCTION GetPixelAG(x,y : Word) : Byte;
VAR
  g : Byte;
BEGIN
  ASM
    MOV AH,$0D
    MOV CX,x
    MOV DX,y
    INT $10
    MOV g,AL
  END;
  GetPixelAG := g;
END;

FUNCTION GetPixel(x,y : Word) : Byte;
VAR
  Mempos : Word;
BEGIN
  IF (x > 1) AND (x < 321) AND (y > 1) AND (y < 201) THEN BEGIN
    Mempos := (y-1)*320 + (x-1);
    GetPixel := Mem[VGASegment:Mempos]; {Givs memory position mempos the value of col}
  END
  ELSE
    GetPixel := 0;
END;

PROCEDURE WriteString(x,y : Byte; col : Byte; s : STRING; bi : Boolean);
VAR
  g : Byte;
BEGIN
  ASM
    MOV AH,$02
    MOV DH,y
    MOV DL,x
    MOV BH,$0
    INT $10
  END;
  FOR i := 1 TO Length(s) DO BEGIN
    g := Ord(s[i]);
    ASM
      MOV AH,$0E
      MOV AL,g
      MOV BL,col
      INT $10
    END;
    IF bi THEN BEGIN
    {  Sound(1000);
      Delay(15);
      NoSound;
      Delay(30);}
    END;
  END;
END;

PROCEDURE LoadImage(s : STRING);
VAR
  pix   : FILE;
  R,G,B : Byte;
  ext   : Word;

BEGIN
  Assign(pix,s);
  Reset(pix,1);
  FOR i := 1 TO 10 DO
    BlockRead(pix,ch,SizeOf(ch));

  FOR i := 0 TO 255 DO BEGIN
    BlockRead(pix,ch,SizeOf(ch));
    R := Ord(ch);
    BlockRead(pix,ch,SizeOf(ch));
    G := Ord(ch);
    BlockRead(pix,ch,SizeOf(ch));
    B := Ord(ch);
    SetColor(i,R,G,B);
  END;

  BlockRead(pix,Mem[$A000:0],$FA00);
 { Move(Mem[$9000:0],Mem[$A000:0],$FA00);

  ext := EMBGetMem(64);
  MoveToEMB(Mem[$A000:0],ext,$FA00);
  ClearScr;
  ch := ReadKey;
  MoveFromEMB(ext,Mem[$A000:0],$FA00);}
END;

PROCEDURE ReadPCX(s : String);
VAR
  image   : ARRAY[1..64000] OF Byte;
  pic     : FILE;
  n       : Integer;
  k,R,G,B : Byte;

BEGIN
  Assign(pic,s);
  Reset(pic,1);

  FOR i := 0 TO 255 DO
    SetColor(i,0,0,0);

  FOR i := 1 TO 128 DO
    BlockRead(pic,k,SizeOf(k));

  i:=0;
    REPEAT
      Blockread(pic,k,SizeOf(k));
        k := k AND $FF;
        IF (k AND $C0) = $C0 THEN BEGIN
          n := k AND $3F;
          Blockread(pic,k,SizeOf(k));
          FOR R := 1 TO n DO BEGIN
            Mem[$A000:(y-1)*320+x] := k;
            Inc(x);
          END;
        END
        ELSE BEGIN
          Mem[$A000:(y-1)*320+x] := k;
          Inc(x);
        END;
    UNTIL x>=64000 ;

    BlockRead(pic,ch,SizeOf(ch));

  FOR i := 0 TO 255 DO BEGIN
    BlockRead(pic,R,SizeOf(R));
    R := R SHR 2;
    BlockRead(pic,G,SizeOf(G));
    G := G SHR 2;
    BlockRead(pic,B,SizeOf(B));
    B := B SHR 2;
    SetColor(i,R,G,B);
  END;
{  Move(Mem[$9000:0],Mem[$A000:0],$FA00);}

  Close(pic);
END;

[Killswitch - BANNED FOR LIFE]

A real programmer creates his own programming languages specific to the job he needs to get done. Having created several programming languages I would have to say PHP is one of the worst I have ever come across.

So then why is it the most popular? Why is one of the worlds biggest sites based on it? Why does it have such a following? Also... Why haven't you made a better one? Oh one more... Why isn't yours blowing up and being named the best out there?

PHP walks, you talk.

[psili]

A real programmer creates his own programming languages specific to the job he needs to get done. Having created several programming languages I would have to say PHP is one of the worst I have ever come across.

Best post ever, ASS. -- fuck, even your nick's awesome.
------------
I would love to hire you for a project. I need to print the following statement to a intertube page: "It's common to scratch and sniff one's own butt hole."

How much is that, and can you itemize the prices for the following:
- New programming language
- Naming new language
- Writing compiler for new language (it must work with my custom Windows ME server)
- Actual programming to print statement to web page.
- Anything else you want to throw in

Thanks.
My ICQ is: 1234567

[milambur]

Pft... that's ghey. Here's the real shizznit.

repeat 4 [forward 50 right 90]

Turtle FTW!

Impressive!