#perl -w
use strict;
use lib 'perl-android/lib';
use Android;

Android::send_input_event(
    command => 'text',
    args => ['Hallo_Perlworkshop'],
);

