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

Android::vibrate(1000);

