Foro - Perl en Español

«AWStats es una aplicación escrita en Perl que proporciona una valiosa información acerca del tráfico que recibe un servidor web. En este artículo veremos cómo instalar y configurar AWStats, y las posibilidades que ofrece.»

Artículo

«En nuestro anterior artículo sobre cómo incluir mapas interactivos en un sitio web hemos comentado que el formato GeoJSON está muy extendido para la representación de información geográfica. Existen muchas aplicaciones que leen y generan este formato, pero en ocasiones nos puede interesar desarrollar un script para procesar esta información de una forma no contemplada por estas utilidades.

En este artículo vamos a ver cómo escribir un script Perl para leer y procesar un fichero ...

«Bueno este es el primer tutorial perl desde Unix numero uno,lo que se planea con este tutorial o esta serie de tutoriales es el aprendizaje de este lenguaje para el entendimiento del mismo, así que estos tutoriales están pensados para que sea como un empujón a escribir en este lenguaje de programación y leerlo también solo como un inicio,para que sea comprensible a futuros tutoriales que leas de otras webs».

Artículo

Version Tk de esta nueva version de este script para hacer ascii art desde una palabra.

Una imagen



El codigo


#!usr/bin/perl
#ASCII Art 0.2
#Version Tk
#Coded By Doddy H
#
#http://search.cpan.org/~lory/Text-Banner-1.00/Banner.pm
#

use Tk;
use Tk::Dialog;
use Text::Banner;

#if ( $^O eq 'MSWin32' ) {
#use Win32::Console;
#Win32::Console::Free();
#}

my $color_fondo = "black";
my $color_texto = "green";

my $ven =
MainWindow->new( -background => $color_fondo, -foreground => $color_texto );
$ven->title("ASCII Art 0.2 ...

Una posible versión mejorada de este script para hacer ASCII Art desde una palabra.

El código:

#!usr/bin/perl
#ASCII Art 0.2
#Coded By Doddy H
#
#http://search.cpan.org/~lory/Text-Banner-1.00/Banner.pm
#

use Text::Banner;
use Time::HiRes "usleep";

my $start = Text::Banner->new;

sub head {

my @logo = (
"#=============================================#", "\n",
"# ASCII Art 0.2 #", "\n",
"#---------------------------------------------#", "\n",
"# Written By Doddy H #", "\n",
"# Email: lepukehotmail #", "\n",
"# Website: doddyhackman.webcindario.com #", "\n",
"#---------------------------------------------#", "\n",
"# ...

Kevin Carillo, estudiante doctorado en la Universidad de Wellington (Nueva Zelanda) está haciendo una investigación sobre las comunidades de Código Fuente Libre/Abierto.

Si te has unido a la comunidad Perl en los dos últimos años, te agradecería que le prestaras algo de ayuda. Está interesado en escuchar a gente que contribuya, tanto de forma técnica como no técnica, y que haya tenido buenas o malas experiencias.

Son solo 20 minutos, anónima, y en inglés.

Encuesta ...

Version Tk de este simple script para hacer ASCII Art desde una palabra.

El código

[
#!usr/bin/perl
#ASCII Art 0.1
#Version Tk
#Coded By Doddy H
#Thanks to : reLlene,MARKO,explorer

use Tk;
use Tk::Dialog;
use List::Util "max";

if ( $^O eq 'MSWin32' ) {
use Win32::Console;
Win32::Console::Free();
}

my %letras = (

a => "
@
@
@ @
@ @
@ @
@ @
@@@@@
@ @
@ @
",

b => " ...

Sin mucho que decir dejo este simple script para hacer ASCII Art desde una palabra.

El código


#!usr/bin/perl
#ASCII Art 0.1
#Coded By Doddy H

use List::Util "max";
use Time::HiRes "usleep";

my %letras = (

a => "
@
@
@ @
@ @
@ @
@ @
@@@@@
@ @
@ @
",

b => "
@@@@
@ @
@ @
@ @
@@@@
@ @
@ @
@ @
@@@@
", ...

«Existen varios módulos de Perl exprofesos para Cisco, voy a probar el módulo Net-Telnet-Cisco»

Artículo

«Normalmente, un script utiliza una serie de argumentos, como pueden ser el nombre de un fichero que debe leer, el nombre de un fichero de salida que debe generar, etc. Típicamente, en un entorno unix estos argumentos se especifican en la línea de comandos. Por ejemplo:
$ procesa.pl --fichero 'datos.txt' --salida 'informe.txt' --desde '2012-01-01' --max-lineas 1000

En este artículo vamos a ver cómo procesar en Perl los argumentos que se reciben de este modo, y ...