Programando cosas

Esto hace rato que lo queria postear es simplemente un codigo muy simple que me ayuda a bajar las fotos de celulares que tienen camara y me las pasan por infrarojo a la palm y de la palm las bajo a la maquina 😮


#! /usr/bin/perl -w
use strict;
use Palm::PDB;
use Palm::Raw;
use Data::Dumper;

my $pdb = new Palm::PDB();

Palm::PDB::RegisterPDBHandlers(«Palm::Raw», «» );

$pdb->Load($ARGV<0>);

foreach my $record (@{$pdb->{records}})
{
print $record->{data} ;
}
es simplemente algo como esto

~# perl miprog.pl Cam0021.pdb > foto.jpg

y estos son unos links muy buenos sobres docs de apache
http://redimido.glo.org.mx/presentaciones_y_textos/howto/reverse_proxy_con_a
http://blackshell.usebox.net/archivo/992.php

LastRSS y template sigma

Queria escribir algo de como me salio el widget ReadRSS para BiF3 con el cual tuve bastante lio, y resolvi solo tomar la informacion que se presenta en cada noticia por separado obviando la info del la fuente autor etc y por asi decirlo la metadata que viene de antemando y hacer que lo tome como variables de sigma

el php seria este

// load some RSS file
if ($rs = $rss->get($rss_url)) {
foreach ($rs<'items'> as $key){
$this->tpl->setVariable($key,$rs<'items'>);
$this->tpl->parse('item');
}
}

y el template seria este otro


{title}