Crear aplicaciones para Android con Perl

Yo soy mas fan del desarrollo de iOS en objective-C y de sus apps,tweaks,etc,por eso no ven que hable mucho de android en Tiempo de Tux,ni de su desarrollo de apps nativas con eclipse ni de roms,root,apps,etc pero si los conozco y de hecho uso android desde el tmobile G1 competencia del iPhone 2g(que tiempos), pero ya desde antes era usuario de iOS así que ya estaba amarrado a iOS :P

Bueno el caso es que últimamente estamos viendo programación perl,mas en especifico

scripting perl Unix

Y también tengo dos móviles android así que me di a la tarea de investigar si se puede programar en perl apps para android,ya que había oído que se puede programar en python.lua,ruby y pensé que no dejarían fuera a nuestro poderoso y legendario Perl

Y si,no lo dejaron fuera del desarrollo de aplicaciones para el sistema de google,lo único que se tiene que hacer es bajar dos apps al móvil y empezar a escribir

Bueno como yo lo hago es así

1.Saber escribir en dicho lenguaje(estudiarlo)

2.Dar un paseo por la API(ver documentación)

3.Comenzar un pequeño programa(app) desde hola mundo,hasta nuestras propias limitaciones

Así que aquí el tutorial de Hola Mundo con perldroid android-scripting

Esto es un poco avanzado así que tengo en cuenta que sabe instalar apps de terceros, usar el menú botones,etc

1.Descarga perl for android

Enlace

Instala y abre la app

Le damos en install y descargara lo necesario(esperamos)

2.Descarga sl4a

Enlace

Instala y abre

Nos saldrán dos archivos

Si corremos test nos saldrá mucho de lo que podemos hacer con perl en android

3.Hola Mundo

Como pueden ver ya nos trae un Hola mundo.pl pero aquí otro

Solo le damos al boton de menu y add

Elegimos Perl

Hola mundo normal

Escribimos:


use Android;

my $texto = Android->new();
$texto->makeToast("Hola Mundo!!!");

Luego en el botón menu

Save & Run

Hola mundo alert

Podemos crear una pequeña alerta así

use Android;

my $texto = Android->new();

$texto->dialogCreateAlert("Titulo", "Alerta");

$texto->dialogShow()

Por ejemplo yo lo implemente así:

use Android;

my $droid = Android->new();

$droid->dialogCreateAlert("Hola Mundo!!!", "Hola perldroid!!!");

$droid->dialogShow()

Y da este resultado al ejecutar

También podemos hacer esto mas interesante añadiendo un PositiveButton

iría (+ o -) así:

use Android;

my $droid = Android->new();

$droid->dialogCreateAlert("Hola Mundo!!!", "Hola perldroid!!!");

$droid->dialogSetPositiveButtonText("Salir");

$droid->dialogShow()

Y daría este resultado al ejecutar

Se pueden hacer muchas cosas con el scripting perl,al igual que con python(que hay mas documentación  pero viendo la API y ya sabiendo programar en perl podemos sacarle provecho a esta forma de creación de apps.

Referencia: code.google.com/p/android-scripting/

                    code.google.com/p/android-scripting/