Ejemplo:
Using perl Syntax Highlighting
#!/usr/local/bin/perl
use PerlHP;
<html>
todo lo que quieras
<?
print "Hola explorer";
?>
</html>
use PerlHP;
<html>
todo lo que quieras
<?
print "Hola explorer";
?>
</html>
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Claro que esto no es más que una forma degradante y para mi de burla de PHP pero es útil... de hecho me dio por usarlo en una página real y me funciona. Miren:
http://rematesyoportunidades.com/
Así que para los que quieran trabajar con esto, lo pueden hacer... es más, hice hasta una función para incluir archivos como la función include de PHP. Bueno, está solo para contenido estático.
Using perl Syntax Highlighting
sub include_file{
my $archivo = shift;
open (FILE, $archivo) || die "No se pudo abrir el File";
@file = <FILE>;
print @file;
}
include_file('pagina.html');
my $archivo = shift;
open (FILE, $archivo) || die "No se pudo abrir el File";
@file = <FILE>;
print @file;
}
include_file('pagina.html');
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
Es algo patético pero servirá para no darle vueltas a la enseñanza a gente con pereza de instalar un HTML::Template... Aunque no quiero que la comunidad de Perl me despescuece si me da por promocionar eso... Pero es que perlLite está lejos aun, jejeje
Espero criticas, regaños, opiniones, jeje
Aquí dejo la URL de la página
http://wakaba.c3.cx/s/web/perlhp.html
