Hatena::Grouptakatoshi

メモ帳 このページをアンテナに追加 RSSフィード

 | 

2008-04-18

関数呼び出し

15:33 |  関数呼び出し - メモ帳 を含むブックマーク はてなブックマーク -  関数呼び出し - メモ帳  関数呼び出し - メモ帳 のブックマークコメント

こうやって関数呼べるんだね。

#!/usr/bin/env perl
use strict;
use warnings;

sub hello_in_jp {
    print "こんにちは!\n";
}

my $func = 'hello';
my $lang = 'jp';

{
    no strict 'refs';
    &{ $func . '_in_' . $lang }();
}

このソース読んでて知った。

http://search.cpan.org/src/BRICAS/Catalyst-Plugin-I18N-0.07/lib/Catalyst/Plugin/I18N.pm

 |