Select Code to Download

use strict;
use warnings;
...
CloseClipboard()           or die;

GlobalFree( $h );

use Encode 'encode';

my $str = encode 'CP1255', "\x{05d0}\x{05d1}\x{05d2}";
system "echo $str| clip";

use strict;
use warnings;
...

my $str = encode 'CP1255', "\x{05d0}\x{05d1}\x{05d2}";
system "echo $str";