Blowfish はブルース・シュナイアー（Bruce Schneier）による暗号化アルゴリズム。特許は取ってないとのことで、自由に使えて安心。

Dr. Dobb's Journal での解説(1995)が分かりやすいです。
http://www.schneier.com/paper-blowfish-oneyear.html

P-array と S-boxes の初期化に使っているのは、円周率を16進数で
あらわしたもの。
解説では "the hexadecimal digits of pi(less the initial 3)" と
説明があります。
下記URLに16進表記がありました。
http://www.super-computing.org/pi-hexa_current-j.html

Pure Perl での実装も参考に。直書きです。
http://search.cpan.org/src/MATTBM/Crypt-Blowfish_PP-1.12/Blowfish_PP.pm


参考(1)：実装いくつか。

Blowfish 暗号を用いたお手軽暗号化プログラム bcrypt。
パスワードで暗号・複合化。Unix系OSでもWindowsでも。
Bcrypt - Blowfish File Encryption
- http://bcrypt.sourceforge.net/

BlowfishのPerlモジュールがCPANに。
- Crypt::Blowfish
  http://search.cpan.org/~dparis/Crypt-Blowfish-2.10/
- Crypt::Blowfish_PP
  http://search.cpan.org/~mattbm/Crypt-Blowfish_PP-1.12/

参考(2)：ドキュメント。

- :: Cepheid :: - Blowfish暗号化アルゴリズム
  http://www.ss.iij4u.or.jp/~somali/web/_blowfish.html
- BlowFishアルゴリズム 関連情報 - Team Zero Dividers
  http://hp.vector.co.jp/authors/VA007786/jpz.html
- Blowfish : Bruce Schneierのページ。
  http://www.schneier.com/blowfish.html