Android で簡単な Perl スクリプトを実行したいと考えています。私はperl-android-apkを使用しています。これにより、Perl インタープリターを 1 つの APK ( SL4Aに基づく) に含めることができます。プロジェクトにhello.pl
は、トーストを表示するスクリプトが付属しています。さて、これまでのところすべてが機能しているので、ファイル作成用にいくつかの行を追加しましたhello.pl
。スクリプト全体は次のようになります。
use Android;
my $a = Android->new();
$a->makeToast("Hello, Android!");
open(TEXT,">newtext.txt") || $a->makeToast("I died.");
print TEXT "Check out our text file!";
close(TEXT);
$a->makeToast("Bye, Android!");
newtext.txt
Android ですべてを実行すると、両方のトーストが表示されますが ("Hello.." と "Bye..")、どこにもファイルが見つかりません。私は何を間違っていますか?