01_hello_world.pl

use strict;
use warnings;

use Android;
my $d = Android->new();
$d->makeToast("Hello, Android!");