windows |
30/03/2015 |
On utilise le module Win32::Clipboard.
#!/usr/bin/perl -w print $ARGV[0]; use Win32::Clipboard; $clip = Win32::Clipboard->new(); $clip->Set( $ARGV[0] );
#!/usr/bin/perl -w use Win32::Clipboard; $clip = Win32::Clipboard->new(); $val = $clip->Get(); print "$val";