Select Code to Download

use strict;
use warnings;
use Crypt::RSA;
...
my $pkey  = new Crypt::RSA::Key::Private ( Filename => '/home/abc/.ssh
+/id_rsa' );

print $pkey;

Number found where operator expected at (eval 21) line 6, near "ZapzlA
+9gZ8
23"
    (Missing semicolon on previous line?)
...
Bareword found where operator expected at (eval 21) line 9, near "34Cs
+y0lcx"
    (Missing operator before Csy0lcx?)
Having no space between pattern and following word is deprecated at (e
+val 21) line 10.