Select Code to Download

my $gpg = '/home/gpghrp/.gnupg';

...

rename($temp, $file)
   or die "Can't update $file: $!\n";

perl -i -pe '/\Q(?)readonly tlx=\E/ && substr($_,13,8,"blah");' /home/
+gpghrp/.gnupg/scripts/gpg_encr.saved