2

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.txtAndroid ですべてを実行すると、両方のトーストが表示されますが ("Hello.." と "Bye..")、どこにもファイルが見つかりません。私は何を間違っていますか?

4

1 に答える 1