// A fake script for your faked life

/* nascer.bas */

001 LOAD "" <ENTER>
002 COUNT = NASCER()
003 GOTO VIVER

/* viver.java */

Public Viver {
	 Viver(Object sonhar, Object sofrer, Object sorrir) {
		 try {
 			Feroz sentir = agitar_arder_discutir(sonhar);
  			Nítido fogo = desaparecer_destruir_queimar(sofrer);
			Colérico grito = dissolver_persistir_devorar(sorrir);
			JNIpointer = call_c("morrer.c");
		 }
 		catch (ExceptionVer e) { olhar(e.sonho);  } 
		catch (ExceptionOuvir) { escutar(e.sofrimento) }
		catch (ExceptionTocar e) { printf("beijar %s", e.sorriso) } 
	}
}

/* morrer.c */

int main() {
	if (morrer("www.facebook.com")) printf("Primaveras adormecidas, tempestades desconformes, manhãs magnéticas");
	if (morrer("www.twitter.com"))  printf("Sombras cegas, sons eléctricos, tumultos invisíveis");
}

int morrer(char[] *rede_social) {
	socket s = s.conn(rede_social, SOCK_DGRAM);
	s.kill(-9);
	return 1;	
}

/* ressuscitar.pl */

sub recombinar(%nascer, %viver, %morrer) {
	while (1) {
	  foreach (%nascer, %viver, %morrer) {
		verbo = random(1);
		if (verbo) {
    		  $nova_vida =~ s/nascer/desnascer/egi && call "nascer.bas";
		  $nova_vida =~ s/viver/desviver/egi && call "viver.java";
		  $nova_vida =~ s/morrer/desmorrer/egi && system("morrer.c");
		}
		else {
    		  $nova_vida =~ s/nascer/renascer/egi && call "nascer.bas";
		  $nova_vida =~ s/viver/reviver/egi && call "viver.java";
		  $nova_vida =~ s/morrer/remorrer/egi && system("morrer.c");
		}
 	   }
	}
 	return;
}