下記サイトの「添付ファイル付きメールを送信する」をコピペして
とりあえず動かしてみようとしたのですが、Undefined subroutineが返ってきました
ttp://www.stackasterisk.jp/tech/program/perl03_03.jsp

エラーメッセージは以下です
> Undefined subroutine &main::myCreateTextFunction called at test4.pl line 9.

おそらく「$attach_data = &myCreateTextFunction;」でサブルーチンが見つからないという事だと思いますが
ソースを追っても何が原因なのかよく分かりませんでした

こちらの環境は以下の通りです
WindowsXP Home
ActivePerl v5.10.1
sendmailの代わりに以下を導入しています

ttp://homepage1.nifty.com/yito/anhttpd/faq/sendmane.html

このプログラムの設定自体は正常です(コマンドラインからのテスト実行でメールは正しく受信出来ました)
ソース内のsendmailの記述(42行目あたり)も上記プログラムのパスに置き換えています
mimew.plとjcode.plはどちらもスクリプトと同じディレクトリに格納しています

何かヒントだけでも結構ですのでお願いします