Una de las cosas más bonitas que puedes hacer gracias a mod_perl, son las PerlSections.

Básicamente con éstas, lo que puedes hacer es definir dinámicamente directivas de configuración de Apache y hacer cosas bien interesantes. Por ejemplo, recientemente, para Planeta Linux quería tener una sola configuración de Apache para los virtual hosts que son repetitivos dada cada instancia (mx.planetalinux.org, ve.planetalinux.org, gt.planetalinux.org, etc). Precisamente lo que quiero evitar es tener que poner una interminable lista de VirtualHost's, así que lo puedo hacer con secciones en Perl (que son denotadas en cualquier archivo de configuración en Apache con <Perl> y </Perl>):

<Perl>

	my $names = {
		cl => 'PlanetaLinuxChile',
		co => 'PlanetaLinuxColombia',
		cr => 'PlanetaLinuxCostaRica',
		ec => 'PlanetaLinuxEcuador',
		sv => 'PlanetaLinuxElSalvador',
		es => 'PlanetaLinuxEspana',
		gt => 'PlanetaLinuxGuatemala',
		mx => 'PlanetaLinuxMexico',
		ni => 'PlanetaLinuxNicaragua',
		pa => 'PlanetaLinuxPanama',
		pe => 'PlanetaLinuxPeru',
		ve => 'PlanetaLinuxVenezuela',
		debian => 'PlanetaDebian',
	};

Defino una referencia a hash en $names que lista contra los "TLDs" de cada instancia y con su nombre largo.

	my $instancias = [keys %{$names}];

Para facilitar trabajar con las llaves, creo una referencia a un arreglo que contiene exclusivamente las llaves del hash que previamente tenía definido.

	$VirtualHost{"*:80"} = [];

Como voy a definir todos mis VirtualHost's apuntando hacia "*:80", defino el valor de la llave "*:80" del hash pre-definido $VirtualHost (pre-definido por mod_perl), hacia una referencia de arreglo vacío (por el momento).

	for my $pais(@{$instancias}) {

Empiezo a interar cada uno de los elementos de $instancias y asigno cada valor en la interación a $pais.

		my $vhost = $pais.".planetalinux.org";

		if ($pais eq 'debian') {
			$vhost = 'planeta.debian.net';
		}

El nombre del servidor será $pais.".planetalinux.org", a menos que sea "debian", que no lleva el dominio de Planeta Linux.

		my $virtualh = {
			SuexecUserGroup => ["planetalinux", "planetalinux"],
			ServerAdmin => 'planetalinux@googlegroups.com',
			ServerName => $vhost,
			DocumentRoot => "/var/www/planetalinux/".$vhost,
			ErrorLog => "/var/log/apache2/planetalinux_".$pais."_error",
			CustomLog => ["/var/log/apache2/planetalinux_".$pais."_access", "combined"],
			LogLevel => "info",
			Alias => ["/images/", "/home/planetalinux/current/www/instancias/".$pais."/images/"],
			Redirect => ["/rss20.xml", "http://feedproxy.google.com/".$names->{$pais}],
		};

Aquí defino la referencia al hash principal del virtual host. Los valores son definidos con los nombres de las directivas que utiliza Apache:

• SuexecUserGroup, pues utilizamos suexec en el servidor se asigna a una referencia de arreglo anónima con dos valores, que son los dos valores que se le pasan a Apache en sus directivas regulares.
• ServerAdmin, es el mismo para todas las instancias, nuestra lista de correos.
• ServerName, es el nombre que definí previamente como $vhost.
• DocumentRoot, depende también de $vhost pues así lo tenemos definido en nuestro sistema de archivos.
• ErrorLog, caso similar a DocumentRoot.
• CustomLog, caso similar a ErrorLog, pero defino, igual que en SuexecUserGroup, un arreglo anónimo con los dos valores que toma este parámetro.
• LogLevel, igual que en Apache.
• Alias. Defino un alias simple.
• Redirect, puedo utilizar cualquier tipo de directivas, Alias, Redirect, lo que sea. En este caso, realizo la redirección de los viejos feeds "/rss20.xml" hacia la nueva URL de FeedBurner, que es ahora como manejamos los feeds en Planeta Linux. El valor que se concatena al final es el valor del hash %{$names} dada la llave $pais.

		push @{$VirtualHost{"*:80"}}, $virtualh;

Agrego cada $virtualh al arreglo de VirtualHosts en "*:80". Si tuviera una IP por cada uno de los VirtualHosts, no es necesario hacer push a un arreglo, simplemente tendría que declarar las variables $VirtualHost con la IP como llave. Sin embargo, si declaro muchas veces la misma variable, como en este caso, $VirtualHost{"*:80"}, en cada interación el valor se reescribirá, es por eso que mod_perl nos ofrece definir esa variable como referecia a arreglo en donde podemos meter cuantos virtual hosts como queramos.

	}

Termino el ciclo for.

</Perl>

Las posibilidades son muchas para la configuración dinámica de Apache y en secciones Perl puedes utilizar cualquier cosa, abrir tus archivos para ver otros parámetros de configuración, conectarte a bases de datos para sacar información, lo que sea.

Si te interesa ver todo el archivo de configuración, está acá, en el GitHub público de Planeta Linux.

Pues algunos de los que me siguen ya lo habrán visto: hemos colocado una cuenta de Twitter en donde se sindican los feeds de todas las instancias de Planeta Linux. Es una buena forma para seguirle la pista a los alrededor de 550 blogs que Planeta Linux abarca en sus doce instancias.

http://twitter.com/planetalinux

¡Disfrútenlo!

Conozcan a Coccinni:

De ascedencia italiana, Coccinni ha sido siempre muy listo y obediente. Desde pequeño hacía sus tareas, respetaba a sus mayores, no decía groserías y hasta tocaba el violín. Intentó aprender el piano una vez pero nunca lo pudo dominar.

Sus papás lo abandonaron en Nueva York cuando él apenas era un lechoncito pero poco a poco y gracias al gobierno porcino ha podido salir adelante y hoy en día tiene una carrera universitaria en tocinos y embutidos alternativos (es decir, no provenientes del cerdo).

Coccinni es soltero y no es racista pues tiene a algunos primos lejanos que son de Guinea y sabe lo doloroso que es lo discriminen a uno. Coccinni es un cerdito carismático que gusta también de los atardeceres en la playa y pasar tiempo con sus amigos comiendo chicharrones de harina.

Seguro a más de uno le llegó este correo:

Nacos. Lo curioso es que el From del correo sí viene escrito bien.

Similarmente, hace unos meses, Gandhi envió un mail publicitario con subject: «¡Héchatelos a la bolsa!», cosa que me indignó, viniendo específicamente de una librería "de prestigio":

Entonces no tuve más remedio que mandarles un enardecido correo:

A lo que tuvieron a bien contestarme:

¿Mamila? Es lo de menos, es bien grave tener faltas de ortografía en tus productos chaqui-comerciales. ¿Le voy a escribir a NIC México mostrándole su naco error? No, esos compas valen pa' puro pito.

Bueno pues las Olimpiadas ya terminaron. Ésto es una buena noticia dado que Raquel ya me dejará desvelarme en las noches otra vez viendo capítulos viejos de Sex and the City y Will & Grace que pasan siempre en CBS (o una de esas televisoras secundarias) a la medianoche. Sin embargo, hay algo que me gustaría comentar al respecto de las olimpiadas.

Ésta fue la primera vez que viví un evento de tal envergadura (qué palabra tan soez) fuera de casa, fuera de México. Me di cuenta de que a algunos gringos sí les importa representar a su país dignamente  y no traerle medallas al presidente, si no llevárselas a su casa y llenar de orgullo a su familia. Aquí no se andan con mamadas de que se vanaglorien por las medallas que sacan, los medios de televisión no los maman, simplemente se alegran de que diariamente haya hasta decenas de medallas de oro. Tienen mejores cosas que engrandecer, como por ejemplo, Michael Phelps y compañía. Si yo fuera gringo me llenaría de orgullo ver a mi país ganando en muchas competencias, luchando el mismo nivel que los mejores del mundo de otros países. Si fuera gringo o si fuera cualquier otra cosa (menos chino), en todo caso.

Ésta fue la primera vez que veo cómo es la transmisión por televisión de unos JO diferente a como lo hace Televisa o TV Azteca. Aquí no hay compayitos, ni güiri-güiris, ni "el color", ni dan importancia a los turistas nacionales que se dieron la vuelta para allá viéndolos nada más haciendo el ridículo frente a un imbécil al cual no podría importarle menos. No pasan a la gente afuera de las sedes embriagándose. No les interesa ser "el primer medio en el mundo en llegar a China", como Televisa hizo teniendo a un pelado allá desde hace como tres años. Sí hay varios reportajes previos, pero no son de cómo Chonita, que es campeona en caminata de la Magdalena Mixhuca, tiene que guisar y mandar a la escuela a sus once hijos, luego irse a trabajar de taxista y en las noches entrena en las canchas del deportivo donde hay un sólo farol funcionando. Los reportajes son de un cabrón que fue a la guerra en Irak, le mutilaron las piernas y ahora se prepara para competir en los paralímpicos y seguir representando a su país con orgullo. Quiero ver cuándo, en primer lugar, alguien es lo suficientemente patriota en México para irse a la guerra con otro país. Y estoy hablando de un gringo que quiere a su país, no cualquier paisanito hecho gringo y mandado a la guerra a la de agüevo. Puedes estar a favor o en contra de la guerra en Irak, pero no es un juego de niñetes ir y poner tu culo para que lo balaceen. Y así hay varios.

En los primeros días, entrevistaron a Bush en el estudio de NBC (igual, no importa si eres pro- o anti-), y cambiándole a Galavisión (que es la mierda de Televisa en Estados Unidos) entrevistaban a Carlos Hermosillo. Los medios aquí se enfocaban en darle la mayor cobertura a Michael Phelps, sus ocho medallas, y cómo iba a encomendarse a su mamá y su hermana. Al ver Azteca América, veo que los comentaristas lloran (sí, lloran) por la primera medalla de oro en Beijing. Al competir Phelps, pasan imágenes del estadio de los Baltimore Ravens lleno hasta su madre para que todos los vecinos de Phelps vean la competencia. En México pasan la típica escena de la familia del competidor en su sala, sus ocho hermanos, sus siete hijos, su dieciséis tíos y la mamá al borde del llanto por ver al hijo llegar en vigesimo-séptimo lugar.

Vaya, las transmisiones en México son una mamada. Es puro atole con el dedo y sí, a final de cuentas, puro entretenimiento chaquetero.

En una calurosa mañana de diciembre de… creo que 2005, desperté. La noche anterior había soñado que tenía una muy bonita PowerBook y que era un feliz usuario de Mac. La idea me rondó por dos minutos mientras, recostado en la cama, decidía mi futuro tecnológico. Era perfecto, utilizando mi Mac y siendo todo tan hermoso, simplemente perfecto. Perfecto imbécil terminé siendo porque me paré de la cama, me vestí, me subí al coche (así es, no me lavé los dientes, ni me bañé ni nada de eso) y me dirigí al Lumen de Insurgentes. Al salir de ahí observaba atónito la copia del voucher que acababa de firmar por alrededor de 25 mil pesos. Claro, le había dado vuelo a la tarjeta que hacía menos de dos semanas me había llegado.

Y así empezó todo.

Cuando me pongo a pensar y dejar volar la mente imaginando cómo puede ser estar en un túnel donde cien personas empujan hacia una salida minúscula, trancada por la policía, siento una muy, aunque breve, incómoda desesperación. Imagina que te falta el aire; que por más que quieres zafarte de la multitud, no puedes; intentas abrir espacio, pero tus tristes brazos son impotentes contra el choque humano; la vista se te empieza a nublar, te sientes débil, te duele el pecho y los pulmones, sudas frío, sientes el sudor en el cuello y de repente lo dejas de sentir. Gritas, o intentas hacerlo, pero tu voz se sofoca; sabes que duele, pero empiezas a olvidar el dolor. Gente alrededor de ti hace exactamente lo mismo. Imagina si tú, que pesas cien kilos y mides casi un metro ochenta, experimentas todas esas sensaciones, qué sentirá una muchachita de uno cincuenta, de 55 kilos, en la misma situación que tú, está al lado de ti, llorando, sufriendo, muriendo. Y luego mueren los dos asfixiados. Dejas de sufrir porque has muerto. Y tu compañera, con la que diez minutos antes estabas bailando en la pista, coqueteando y tomando una cerveza, te esperaba muerta minutos antes. Al final, son trece los que, como tú, murieron en la misma situación.

De verdad que es bien lamentable, triste, inconcebible, que la policía provoque ésto. Cómo es posible. Cómo. ¿Y qué hicieron al respecto Felipe Calderón, Marcelo Ebrard, Joel Ortega? Puta bola de bufones infelices muertos de hambre. Ojetes de mierda.

Intenta imaginar, tan sólo por un instante, cómo pudo haber sido y qué debió haber sentido la gente.

Recomiendo mucho esta columna de Jacobo Zabludovsky.

En el último par de semanas, y gracias principalmente al interés de la gente y de David Valdez que se puso las pilas, hemos crecido en la familia de instancias en Planeta Linux, pues se han unido a nuestra familia las instancias de Costa Rica, El Salvador, Nicaragua y Panamá. Muchas gracias a cada uno de los interesados que mandaron los feeds y nombres acusando a los blogueros linuxeros centroamericanos para regocijo de los lectores. Ya somos once las instancias en Planeta Linux:

• Planeta Linux Chile
• Planeta Linux Colombia
• Planeta Linux Costa Rica
• Planeta Linux Ecuador
• Planeta Linux El Salvador
• Planeta Linux España
• Planeta Linux México
• Planeta Linux Nicaragua
• Planeta Linux Panamá
• Planeta Linux Perú
• Planeta Linux Venezuela

Muchas cosas se han prometido alrededor de Planeta Linux y hemos ido caminando muy lentamente, pero nuevas cosas quiero que se implementen:

• Un nuevo diseño.
• Instancias más integradas unas con las otras.
• Una instancia global agrupando a los casi 500 inscritos activos.
• Empezar a usar Vitacilina, reemplazando a Planet.
• RT para manejar las peticiones.

Gracias a todos, tanto a los que escriben, los que leen, los que administran, los que apoyan.

Una vez que una persona está dada de alta en Hacienda y puede expedir recibos de honorarios por actividades profesionales extras, como muchos de nosotros, programadores y desarrolladores que nos salen chambitas eventuales, nos topamos a veces con que no entendemos cómo es que se calculan bien las cantidades para los recibos de honorarios. Y a mí también me ha pasado mucho hasta que realmente me puse a estudiar al respecto (en realidad no, pero mi papá me echó la mano entendiéndolo).

Hay tres casos en la vida de un consultor que expedirá un recibo de honorarios. Digamos que hemos quedado de acuerdo que la programación del HolaMundo.pl va a costar $1'000 pesos.

1. Actividad limpia.

Es decir, quedas de acuerdo con quien te está empleando que las actividades que realizarás no les van a incluir impuestos. Ésto tiene sus ventajas buenas y malas, tanto para la empresa como para uno, pero puede darse. En ese caso, como es de acuerdo mutuo, haces tu trabajo y te pagan los 1'000 pesos.

2. Cantidad antes de impuestos.

Ésto es lo que usualmente le conviene a las empresas. Al total pactado se le suma el IVA, luego del total pactado se calcula el 10% para retenciones, uno para la retención del IVA y otra para la retención del ISR. Finalmente, al subtotal se le restan ambas retenciones:

• Honorarios: $1'000
• + IVA 15%: $150
• Subtotal: $1'150
• - retención ISR 10%: $100
• - retención IVA 10%: $100
• Total a pagar: $950

A final de cuentas uno termina viendo un poco menos de lo que se pactó al principio, 5%.

3. Cantidad después de impuestos (o «hacia arriba»).

Para muchos de nosotros es mejor acordar que el costo total será, después del cálculo de impuestos. Se hace la misma operación, pero al revés, ahora los $1000 pesos deben terminar como el total a pagar. Primero dividimos esa cantidad por 0.95, para obtener la primera cantidad de honorarios, y luego hacemos el mismo mecanismo usado anteriormente:

• Yo quiero cobrar: $1'000
• David me dijo que divida entre 0.95 y da: $1'052.63.
• Honorarios: $1'052.64
• + IVA 15%: $157.89
• Subtotal: $1'210.52
• - retención IVA 10%: $105.26
• - retención ISR 10%: $105.26
• Total a pagar: $1'000

¿Por qué entre 0.95? Porque esa es los $1'000 son la cantidad que quieres obtener luego de agregar 15% y restar 20% por las retenciones.

De cualquiera de ambas formas, a quien le das el recibo de honorarios debe darte un acuse de recibo de que se quedó con tus retenciones, cosa que tú presentarás ante el SAT a su debido tiempo.

También suele suceder que la empresa te requiera el recibo de honorarios antes de que te paguen, precisamente para que el dinero pueda ser comprobado. Aunque este es un paso completamente innecesario es mejor respetarlo, en México las empresas hacen cosas muy raras para "protegerse".

Espero que te sirva.

Íbamos en el metro de Nueva York dirigiéndonos al hogar. Ella disfrutaba del nintendito que es novedad y es plenamente adictivo con varios cartuchitos. El trayecto subterráneo es de la W4 a la 145th, en la línea A o C, da igual. Se suben dos guaditas cualesquiera y se apean cerca de nosotros, agarrados de un tubo vertical, por un momento sus miradas se centran en el videojuego.

- Tsss… Yo ya me compré mi Pi-Es-Pi.

- Ah, sí, ¿y qué tal está? – pregunta el otro.

Mientras tanto, me doy cuenta de que la plática de los paisas se inició por ver el videojuego de ella. Me pongo en guardia.

- No pues sí está bien padrote.

- ¿Pero cuántas canciones le caben?

- Pues un chingo, yo nomás tengo como 60.  – dice entristecido uno de ellos -, pero están más chingonas las gráficas, sí está bien cabrón con los juegos.

- Yo no sé cuál comprarme.

- De todas formas, ya se lo mandé a mis carnalitos. Pus es que allá lo disfrutan más ellos que nosotros aquí.

- Cáaaaaaaaaaaaaaaaaamara – pienso – "Allá lo disfrutan más".

- Pero ya les dije que lo cuiden porque luego se los van a chingar sus amiguitos, luego los niños allá son reculeros. Y pus la neta yo quiero que mis carnales tengan lo que yo nunca tuve.

- Cáaaaaaaaaaaaaaaaaaaaara – pienso.