import @339 https://www.secure-computing.net/trac/browser/SCN Open Source/trunk/ssl-admin/perl/