testdroidperl