



サブルーチンを定義する。
具体的には、ベアワードによるサブルーチンコールが行えるようになる。
pragmaなし:
my $ref = routine; # sub routine への参照が$refに代入される
&$ref(); # sub routine がコールされる
use subs routine:
my $ref = routine; # sub routine がコールされる
use strict subs:
my $ref = routine; # エラー
use strict subs & use subs routine:
my $ref = routine; # sub routine がコールされる。