使用Perl中的Crypt :: OpenSSL :: RSA签名数据

use Crypt::OpenSSL::RSA;
open $privfh,'>:encoding(UTF-8)','private_key';

$rsa = Crypt::OpenSSL::RSA->generate_key(1024); 

$key_string=$rsa->get_private_key_string();
print $privfh $key_string;

$rsa_priv = Crypt::OpenSSL::RSA->new_private_key($key_string);

$rsa_pub = $rsa->get_public_key_string();

$plaintext="hello";
$signature = $rsa_priv->sign($plaintext);
print "Signed correctlyn" if ($rsa->verify($plaintext,$signature));

这个程序运行正常,我能够正确签名数据.但问题是我必须签署大量数据,所以我将key_string写入文件,以便我可以一次又一次地使用它,但问题是当我尝试使用以下代码再次使用它时

use Crypt::OpenSSL::RSA;
open FILE,'<','private_key';

{
  local $/;
  $keystring=<FILE>;
 }
 print "$keystringn";
 $rsa_priv = Crypt::OpenSSL::RSA->new_private_key($key_string);

它抛出错误而不生成$rsa_priv.该程序给出的错误是
RSA.xs：178：OpenSSL错误：testperl.pl第11行没有起始行,< FILE>第1行.
我该怎么做才能在一次生成密钥后一次又一次地签名.