先日 id:gfx からSL4A に Mouse を入れる際の注意点 - WebService::Blog->new( user => ’hide_o_55’ )について以下の連絡を頂きました。 確認したところ、今まで if ($] >= 5.009_005) { となっていたところが if(eval{ require mro }){ に変わっていました。 これにより、SL4Aのような mro.pm が無い環境でもそのまま Mouse が動くようになりました。
PurePerl でも動く Mouse であれば SL4A でも動くだろって軽く考えてたら少しはまったのでメモ。 1. MouseをAndroid端末に転送 adb push Mouse.pm /sdcard/com.googlecode.perlforandroid/extras/perl/site_perl adb push Mouse /sdcard/com.googlecode.perlforandroid/extras/perl/site_perl/Mouse/ 2. Mouseを使用するスクリプトを準備 { package Android::Role; use Android; use Mouse::Role; has android => ( is => 'ro', default => sub{ Android->new }, init_arg => undef, ); p
SL4A(Scripting Layer for Android) の Perl for Android で print するだけで makeToast できる Tie::Android::Toastを Github に上げました。 GitHub - hideo55/Tie-Android-Toast 使い方は以下の通り。 #!perl -w use strict; use Tie::Android::Toast; tie local *STDOUT, 'Tie::Android::Toast'; foo(); sub foo { print 'Hello, World!'; # same as Android->new->makeToast('Hello, World!'); print '...'; } 実用性は皆無。
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く