Hi Mika,
some real-world perl example would be much appreciated. Don't hesitate
to rant on the API. Perhaps you can outline the requirements from a perl
coders point of view. Or even improve it
There is obexftp-0.19/apps/perl_example.pl to get you started.
use OBEXFTP;
my $cli = new OBEXFTP::client($OBEXFTP::USB);
my $ret = $cli->connect(undef, 0); # fill in the interface no.
print "$ret\n";
$ret = $cli->list("/");
print "$ret\n";
sleep 2;
$ret = $cli->list("/Data/");
print "$ret\n";
sleep 2;
$ret = $cli->list("/Data/Misc/");
print "$ret\n";
sleep 2;
$ret = $cli->get("/Data/Misc/README.txt");
print "$ret\n";
$ret = $cli->disconnect();
print "$ret\n";
$cli->DESTROY();
Sadly BT autodiscovery is missing yet.
cu,
Christian
Mika Raento wrote:
I'm hoping to write some code of my own, and thought I'd at least
prototype it in perl, since there are perl bindings.
-------------------------------------------------------
This SF.Net email is sponsored by xPML, a groundbreaking scripting language
that extends applications into web and mobile media. Attend the live webcast
and join the prime developer group breaking into this new coding territory!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=110944&bid=241720&dat=121642
_______________________________________________
Openobex-users mailing list
[email protected]
http://lists.sourceforge.net/lists/listinfo/openobex-users
