FORUM DARKERS

Tecnologia & Informática => Programação => Perl => Topic started by: Joey on 06 de May , 2009, 06:43:50 PM

Title: Win32::Clipboard
Post by: Joey on 06 de May , 2009, 06:43:50 PM
Ok, esses dias eu tava criando uma ferramenta simples, e do nada eu tive a idéia de gravar o resultado no clipboard. Pois é, dei uma pesquisada no nosso bom e velho google, e encontrei o módulo "Win32::Clipboard", que é muito bom, porém só funciona na plataforma Windows. E como estou sem nada pra fazer resolvi escrever um pequeno artigo a respeito desse módulo. Espero que ajude alguém e por favor desculpem-me pelos futuros erros ;D

Quote
Iniciando

O primeiro passo é criar uma instância do módulo e armazená-la em uma variável.

$clip = Win32::Clipboard();

Quote
Mostrando

Agora, vamos a um exemplo de como mostrar o conteúdo que está gravado no clipboard.

print "Clipboard : ", $clip->Get();

Quote
Gravando

Agora um simples exemplo de como gravar palavras no clipboard.

$clip->Set("Joey - www.darkers.com.br");

Quote
Limpando

E por ultimo, como limpar o clipboard.

$clip->Empty;

Quote
Observação

Lembrando que:
$clip->Empty;

é totalmente diferente de:

$clip->empty;

Quote
Exemplo de código
Quote
Exemplo de código
clipboard.pl
#!/usr/bin/perl
# Joey - www.darkers.com.br
use Win32::Clipboard;
$clip = Win32::Clipboard();
$mul = 3*3;
$val = "O valor da multiplicacao e: $mul";

print "$val"; $clip->Set("$val");



Bom, por enquanto é isso pessoal, espero que tenham gostado desse pequeno artigo, qualquer erro, critica ou sugestões podem postar no tópico!

see ya;
Title: Re: Win32::Clipboard
Post by: guidjos on 02 de August , 2009, 01:42:33 PM
Muito bom :)

Isso é bom porque no Windows é chato ficar copiando coisas da janela do prompt.