Perlコーディング

サブ関数を外部ファイルへ

2007年11月20日
昨日作ったサブ関数を、色々なファイルから使えるように、外部ファイルへ書き出すことにしました。


関数部分を切り取って、外部ファイルへ貼り付けて保存します。ファイル名は【function.pl】とします。

関数を使うには、使う側のファイルの先頭で(perlのパスの後ろ)
require 'function.pl';
とするとファイルが読み込まれ、関数が使えるようになります。

コールは、同じファイルにあるときと同じで、
&関数名;
です。


でも、これでは動きませんでした。他のファイルを見ていると、function.plの一番後ろに、【1;】が付いています。試しにつけてみたら、動きました。なんだこの【1;】は・・・


調べてみると、どうやら戻り値が真であるという意味だそうです。