20050706

los graffitis y los stencil

Una nueva moda en mi ciudad es, ya dejando de lado los graffitis tan cargados de colores, una reducción al mínimo de la idea, los stencil.

Esto es, simplemente, un patrón plasmado sobre la superficie de una pared, vereda o calle. Una zona donde realmente esta moda ve un gran auge y fertilidad, es en el Centro de la ciudad de Buenos Aires.

Hay de todas las formas y simbología, desde dibujos (por ejemplo, el Che Gevara, pero en la boina está el logo de Nike en vez de la estrella que solía utilizar), o frases.

Una de las frases que más me agradó y me hizo pensar fue:

¿La heterosexualidad tiene cura?

Aunque hay muchas más, pero esta es la que más me hizo pensar hoy a la mañana mientras venía al trabajo.

20050630

otro blog

Desde que no tengo internet que dejé de tener internet dejé de darle atención al blog, y ahora vuelvo a la marcha.

Esta vez para decir solamente:


#!/usr/bin/perl -w

my $flag=0;
my $tty=`/usr/bin/tty`;
my $dig="/usr/bin/dig";
my $domain="telecom.com.ar";
$tty=~s/(\n\r\r\n)$//;
$tty=~s/dev/;
my $ip = "";
chop($tty);
my $tflag = 1;
open("TMP","last") die "No pude ejecutar last: $!";

while (($tflag) && ($line = )){
if (($line =~ m/$ENV{'LOGNAME'}/) && ($line =~ m/$tty/)
&& ($line =~ m/still/i)){
my @li = split(" ",$line);
$ip = $li[2];
close(TMP);
$tflag = 0;
}
}
if(($ip=~ m/(\d{1,3})?\.(\d{1,3})?\.(\d{1,3})?\.(\d{1,3})?/)
&&($1<255)&&($2<255)&&($3< 255)&&($4<255)){
$ip="$1.$2.$3.$4";
$flag=1;
}else{
@b=split(" ",$ip);
$b[2]=~ s/([a-b]*)\..*/$1/;
$b[2]=`$dig $b[2].$domaingrep $b[2]grep -v "^;"awk '{print \$5}'`;
$ip=$b[2]; $ip=~s/(\n\r\rn)$//;
$flag=1;
}
print"export DISPLAY=$ip:0\n" if($flag);
__END__


Es un script en Perl (apto para cualquier Unix libre con dig instalado), que da la línea exacta para poner en cualquier host remoto (unix) y así levantar aplicaciones graficas de forma remota.

Se requiere que la máquina en la cual estamos permita las conexiones remotas (que escuche en el puerto 6000).

Devuelve algo como
---8<---8<---8<---8<---8<---8<---8<---8<---
$ myipx
export DISPLAY=10.33.37.12:0
$
--->8--->8--->8--->8--->8--->8--->8--->8---

Por cierto, AMMA (A Mi Me Andaaaaaaaaaaaa) ;-)

gxis revidas