WindowsXP Perl 5.8.8 use Win32::Clipboard; my $clip = Win32::Clipboard(); my $text = $clip->GetText(); print $text;

WindowsXP Perl 5.8.8 文字コードをUTF-8としてコーディングしています。 use Encode; print length(decode('sjis',$text));

自分の時は、ウイルス対策ソフトがウイルス定義ファイル更新に失敗していたようでした。 ウイルス対策ソフトをインストーラで修正し、該当のエラーの発生を待ち受けています。 レジストリを巻き込んで一時は臨終間際にまで陥ったので、バックアップは大切だ…