NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.
All the Perl that's Practical to Extract and Report
Monday October 25, 2004
converting pgp to gnupg
I have a large installed population of pgp keys that want to migrate to gpg / gnupg. This turns out to be easier to automate than I would have guessed... just run the following script over each set of keys:
gpg --import </dev/null # force existence of dir, options, perms, etc.
KEYLIST=`pgp -kv 2>/dev/null |grep ' 0x' |cut -f4 -d' '`
for KEY in $KEYLIST ; do
for RING in $KEYRINGS ; do
pgp -kx $KEY $TMPFILE $RING
if [ -r $TMPFILE ] ; then
gpg --import $TMPFILE
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.