[Rio-pm] Net::Twitter::Lite

[Marcos Machado]

Pessoal,

Eu tô tentando fazer uns posts no Twitter com esse módulo, mas não consigo
fazer com que ele reconheça o meu $clientname. O post funciona mas sempre
vai como "via Perl Net::Twitter".

<code>
use Net::Twitter::Lite;

$user = "usuario";
$password = "senha";

$clientname = "MeuClient";

my $nt = Net::Twitter::Lite->new(
  username => $user,
  password => $password,
  clientname => $clientname,
);

$result = eval { $nt->update('Meu post!') };
</code>

Já vasculhei lá dentro do módulo mas não consegui encontrar o motivo desse
valor não ser repassado para os headers do UserAgent.

Alguém já usou isso?

[]s, MM
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20091204/90963616/attachment.html>