名前¶

feature - 新しい機能を有効にするプラグマ

概要¶

    use feature qw(say switch);
    given ($foo) {
        when (1)          { say "\$foo == 1" }
        when ([2,3])      { say "\$foo == 2 || \$foo == 3" }
        when (/^a[bc]d$/) { say "\$foo eq 'abd' || \$foo eq 'acd'" }
        when ($_ > 100)   { say "\$foo > 100" }
        default           { say "None of the above" }
    }

    use feature ':5.10'; # loads all features available in perl 5.10

    use v5.10;           # implicitly loads :5.10 feature bundle

説明¶

既に存在しているプログラムを壊すことなく、Perl に新しい文法を追加することは、 普通は不可能です。 このプラグマは、リスクを最小化する方法を提供します。 新しい文法構造や、古い構造の新しい意味は、use feature 'foo' で有効化され、 適切な feature プラグマがスコープ内にある場合にのみパースされます。 (それでも、このプラグマに関わらず、CORE:: 接頭辞は全ての Perl キーワードへのアクセスを提供します。)

レキシカルな効果¶

(例えば use strict のような) その他のプラグマと同様、feature は レキシカルな効果を持ちます。 use feature qw(foo) は、この地点からブロックの終わりまでの間だけ、 "foo" 機能を利用可能にします。

    {
        use feature 'say';
        say "say is available here";
    }
    print "But not here.\n";

no feature¶

機能は no feature "foo" を使うことで無効にすることも出来ます。 これもまたレキシカルな効果を持ちます。

    use feature 'say';
    say "say is available here";
    {
        no feature 'say';
        print "But not here.\n";
    }
    say "Yet it is here.";

no feature と、機能を指定せずに使うと、デフォルトグループにリセットします。 全ての 機能を無効にする(普通でない要求!)には、no feature ':all' を 使ってください。

利用可能な機能¶

'say' 機能¶

use feature 'say' は、コンパイラに Perl 6 形式の say 関数を 有効にするように伝えます。

詳しくは "say" in perlfunc を参照してください。

この機能は Perl 5.10 から利用可能です。

'state' 機能¶

use feature 'state' は、コンパイラに state 変数を有効にするように 伝えます。

詳しくは "Persistent Private Variables" in perlsub を参照してください。

この機能は Perl 5.10 から利用可能です。

'switch' 機能¶

use feature 'switch' は、コンパイラに Perl 6 given/when 構文を 有効にするように伝えます。

詳しくは "Switch Statements" in perlsyn を参照してください。

この機能は Perl 5.10 から利用可能です。

'unicode_strings' 機能¶

use feature 'unicode_strings' は、(use locale か use bytes の スコープないでない限り) そのスコープ内で実行される全ての文字列操作に Unicode の意味論を使うようにコンパイラに伝えます。

no feature 'unicode_strings' は、Unicode が求められているのが Perl にとって明らかでない限り、ネイティブな文字集合意味論が使われるところで 伝統的な Perl の意味論を使うようにコンパイラに伝えます。 これは、振る舞いが突然変更されたときに驚きを引き起こすかもしれません。 (詳しくは "The "Unicode Bug"" in perlunicode を参照してください。) この理由により、もしプログラムで Unicode を扱う可能性があるなら、 use feature 'unicode_strings' 副プラグマを 強く 勧めます。

この機能は Perl 5.12 から利用可能になりました; Perl 5.14 でほぼ完全に 実装されました; Perl 5.16 で quotemeta に対応するように拡張されました。

'unicode_eval' と 'evalbytes' 機能¶

unicode_eval 機能の基では、Perl の eval 関数に文字列が渡されると、 文字の文字列として評価し、use utf8 宣言を無視します。 use utf8 はスクリプトのエンコーディングを宣言するために存在し、 バイトの並びにのみ意味があり、文字の文字列では意味がありません。 ソースフィルタは禁止されます; これらもバイトの文字列に対してのみ 意味があるからです。 ソースフィルタを有効にしようとするあらゆる試みはエラーとなります。

evalbytes 機能は evalbytes キーワードを有効にします; これは引数として渡されたものをバイトの文字列として評価します。 文字列に 8 ビットの範囲の外側の文字が含まれていると die します。 ソースフィルタは evalbytes の中では動作します: これらは 評価される文字列の中身に対して適用されます。

これら二つの機能は共に、歴史的な eval 関数を置き換えることを 目的としています; これには(少なくとも)二つのバグがあり、既存のプログラムを 壊すことなく簡単に修正することができません:

• eval behaves differently depending on the internal encoding of the string, sometimes treating its argument as a string of bytes, and sometimes as a string of characters.

  eval は文字列音内部エンコーディングに依存して異なる振る舞いを行い、 時には引数をバイトの文字列として扱い、時には文字の文字列として扱います。

• Source filters activated within eval leak out into whichever file scope is currently being compiled. To give an example with the CPAN module Semi::Semicolons:

  Source filters activated within eval の中で有効にされたソースフィルタは、どの file スコープが コンパイルされているかについてリークします。 CPAN モジュールである Semi::Semicolons を例にします:

      BEGIN { eval "use Semi::Semicolons;  # not filtered here " }
      # filtered here!

  evalbytes fixes that to work the way one would expect:

  evalbytes は、想定通りに動作するように修正します:

      use feature "evalbytes";
      BEGIN { evalbytes "use Semi::Semicolons;  # filtered " }
      # not filtered

これら二つの機能は Perl 5.16 から利用可能です。

'current_sub' 機能¶

これは __SUB__ トークンを提供します; これは現在のサブルーチンへの リファレンスか、サブルーチンの外側では undef を返します。

この機能は Perl 5.16 から利用可能です。

'array_base' 機能¶

この機能はレガシーな $[ 変数に対応します。 "$[" in perlvar と arybase を参照してください。 これはデフォルトではオンですが use v5.16 (後述の "IMPLICIT LOADING" 参照) の基では無効になります。

この機能は Perl 5.16 からこの名前で利用可能です。 以前のバージョンでは、単に常時適用されていて、このプラグマはこれについて 何も知りませんでした。

'fc' 機能¶

use feature 'fc' は、Unicode 畳み込みを実装した fc 関数を 有効にするようにコンパイラに伝えます。

詳しくは "fc" in perlfunc を参照してください。

この機能は Perl 5.16 から利用可能です。

機能の束¶

複数の機能のまとめて読み込むためには、機能の束 (feature bundle) が 使えます。 機能の束の名前には、実際の機能と区別するためにコロンが前置されます。

  use feature ":5.10";

以下の機能の束が利用可能です:

  bundle    features included
  --------- -----------------
  :default  array_base

  :5.10     say state switch array_base

  :5.12     say state switch unicode_strings array_base

  :5.14     say state switch unicode_strings array_base

  :5.16     say state switch unicode_strings
            unicode_eval evalbytes current_sub fc

:default 束は、use feature や no feature 宣言が有効になる前の 機能集合を表現しています。

機能の束での 5.14.0 の 0 のような副バージョンを指定しても効果は ありません。 機能の束は全ての副バージョンに関して同じ事が保証されています。

  use feature ":5.14.0";    # same as ":5.14"
  use feature ":5.14.1";    # same as ":5.14"

暗黙の読み込み¶

機能の束を名前で読み込むより、Perl に機能の束を暗黙に読み込ませるように した方が簡単です。

feature プラグマを暗黙に読み込むには二つの方法があります:

• By using the -E switch on the Perl command-line instead of -e. That will enable the feature bundle for that version of Perl in the main compilation unit (that is, the one-liner that follows -E).

  Perl のコマンドラインで -e オプションの代わりに -E オプションを 使用した場合。 これにより、main コンパイル単位(つまり、-E に引き続く 1 行野郎)で そのバージョンの Perl の機能の束が有効になります。

• By explicitly requiring a minimum Perl version number for your program, with the use VERSION construct. That is,

  use VERSION 構文を使ってプログラムが必要とする最低限の Perl バージョン 番号を明示的に指定した場合。 つまり、以下のようにすると:

      use v5.10.0;

  will do an implicit

  暗黙のうちに以下のように:

      no feature ':all';
      use feature ':5.10';

  and so on. Note how the trailing sub-version is automatically stripped from the version.

  なるということです。 末尾の副バージョンは自動的にバージョンから取り除かれるようになったことに 注意してください。

  But to avoid portability warnings (see "use" in perlfunc), you may prefer:

  しかし移植性の警告("use" in perlfunc を参照してください)を避けるために、 以下のようにするのを好むかもしれません:

      use 5.010;

  with the same effect.

  これでも同じ効果が得られます。

  If the required version is older than Perl 5.10, the ":default" feature bundle is automatically loaded instead.

  要求したバージョンが Perl 5.10 より前の場合、代わりに機能の束 ":default" が 自動的に読み込まれます。