Poe :: Componente :: Nomadjukebox

Poe :: componente :: nomadjukebox é um contol baseado em eventos dos jogadores do Nomad Jukebox.
Baixe Agora

Poe :: Componente :: Nomadjukebox Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • David Davis
  • Site do editor:
  • http://search.cpan.org/~xantus/POE-Component-Proxy-MSN-0.02/lib/POE/Component/Proxy/MSN.pm

Poe :: Componente :: Nomadjukebox Tag


Poe :: Componente :: Nomadjukebox Descrição

Poe :: Component :: Nomadjukebox é um contol baseado em eventos dos jogadores do Nomad Jukebox. Poe :: Component :: Nomadjukebox é um contol baseado em eventos de jogadores do nômade jukebox.synopsis Use PoE QW (componente :: Nomadjukebox); Use dados :: dumper; Poe :: Session-> Create (Inline_States => {{_start => sub {poe :: componente :: nomadjukebox-> criar ({alias => 'njb'});}, njb_started => sub {$ _ -> Post (NJB => 'Discover');}, njb_discover => sub {my ($ kernel, $ heap, $ Devlist) = @_ ; a menos que (Ref ($)) { Imprimir "Falha ao encontrar o Nomad Jukebox, está no? N"; $ kernel-> post (njb => 'desligamento'); retorno;} # Abra o primeiro dispositivo # passe o ID do dispositivo para abrir $ kernel-> post ( njb => 'aberto' => $ Devlist -> -> {Devid});}, njb_opened => sub {my $ kernel = $ _ ; $ kernel-> post (njb => 'disk_usage '); $ kernel-> post (njb =>' track_list ');}, njb_disk_usage => sub {my ($ kernel, $ heap, $ info) = @_ ; a menos que $ info) EQ 'hash') {Imprimir "Falha ao obter o disco USAGEN"; Retorno;} Meu $ Usado = $ Info -> {Total} - $ Info -> {Free}; Imprimir "Total: $ info -> { Total} Free: $ Info -> {Free} bytes usados: $ usados bytesn "; $ kernel-> post (njb => 'desligamento');}, njb_track_list => sub {my ($ kernel, $ heap, $ faixas) = @_ ; $ Kernel-> Post (NJB => 'Shutdown'); A menos que (Ref ($ Faixas) EQ 'Array') {Imprimir "Falha ao obter Lista de Rastrear"; Retorna; } Imprimir "Há" .scalar (@ $ faixas). "Tracksn"; Imprimir Dados :: Dumper-> Dump (); }, njb_closed => sub {Imprimir "Nomad Jukebox FLEEDN"; },},); $ poe_kernel-> Executar (); poe :: componente :: nomadjukebox - contol baseado em eventos dos jogadores do nomad jukebox usando a API da Libnjb localizada em módulo _Requires_ libnjb e você pode precisar ser raiz ou altere suas permissões de acesso ao dispositivo USB. Requisitos: · Perl.


Poe :: Componente :: Nomadjukebox Software Relacionado

Sobre nós