perl - 最初の 8 文字をキャプチャする Perl

Question

たとえば、文字列の 8 文字を取得するにはどうすればよいですか。

私がこのような場合：

my $word ="take first 8 characters";

どうすればこれを印刷できますか: take fir?

Answer 1

を使用しsubstrます。

print substr($word, 0, 8);

Answer 2

組み込みsubstr関数を使用します。substr($string, $start, $length)

Answer 3

perlfaq4から:文字列の N 文字にアクセスしたり変更したりするにはどうすればよいですか? :

substr() を使用して、文字列の最初の文字にアクセスできます。たとえば、最初の文字を取得するには、位置 0 から開始し、長さ 1 の文字列を取得します。

my $string = "Just another Perl Hacker";
my $first_char = substr( $string, 0, 1 ); # 'J'

(文字列の一部を変更する方法については、この記事の残りの部分を参照してください。)