Hjälp - Perlscript som anropar Media Scan

För att utföra en Media Rescan när som helst har jag installerat appen "Rescan Media" (av Aditya Talpade).

Denna app kan jag starta från ett externt Perlscript så här:

Kod:

use Android;
use strict;
use warnings;
print "Launching \"Rescan Media\"...\n";
my $droid = Android->new();
$droid->launch('com.addz.mediascanner.ScanFiles');

Jag tycker dock att det borde gå att optimera bort appen Rescan Media, och kunna utföra en rescan direkt från Perl.

Någon som har nåt tips?



Jag vet att skaparen av "Widgetsoid" framkallar en rescan på nedanstående sätt. Kanske går det att efterapa detta i Perl på något sätt? Jag är ingen programmerare och definitivt inte kunnig i Android-programmering...

Kod:

#tell android system that external storage (SD) have been mounted.
#android will launch the media scanner automaticaly.
context.sendBroadcast(new Intent(Intent.ACTION_MEDIA_MOUNTED, Uri.parse("file://"+ environment.getExternalStorageDirectory())));

 

Jag letade också efter detta förut, men kom inte fram till nåt bra... Hoppas någon har tips