MIME::Base32 (3pm)

  # RFC forces the [A-Z2-7] RFC-3548 compliant encoding
  # default encoding [0-9A-V] is for backward compatibility with pre v1.0
  use MIME::Base32 qw( RFC );

  $encoded = MIME::Base32::encode($text_or_binary_data);
  $decoded = MIME::Base32::decode($encoded);

Encode data similar way like MIME::Base64 does.

Main purpose is to create encrypted text used as id or key entry typed-or-submitted by user. It is upper/lowercase safe (not sensitive).

\s-1ALLWAYS\s0 \s-1NOTHING\s0

Daniel Peder, sponsored by Infoset s.r.o., Czech Republic <[email protected]> http://www.infoset.com

Copyright (c) 2003-2010 Daniel Peder. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

Version 1.02 provides minor changes only: - added \s-1COPYRIGHT\s0 according to \s-1FEDORA\s0 & \s-1DEBIAN\s0 community requests - test.pl - extended test string (just for sure ;)

perl\|(1), MIME::Base64\|(3pm).