如何拼接標量變量？

Question

$ab = "asljdhashdklasjkl ;dajs;ld";

我想要$ab的前10個字符。

可以使用splice功能嗎？

Answer 1

substr($ab, 0, 10)

在這里閱讀有關substr函數的更多信息

Answer 2

Substr非常適合您的示例。 Splice在一個陣列上運行，所以你需要往返它：

#!/usr/bin/perl
my ($ab, @ab, @first_ten, $first_ten);

$ab = "asljdhashdklasjkl ;dajs;ld";

@ab = split(//, $ab);
@first_ten = splice(@ab, 0, 10);

$first_ten = join('', @first_ten);

Answer 3

#! /usr/bin/perl 
use strict; 
my $info = "asljdhashdklasjkl ;dajs;ld";
my @personal = split(//, $info);
print @personal[0..9];


C:\Documents and Settings\Administrator>perl perltest.pl
asljdhashd
C:\Documents and Settings\Administrator>
C:\Documents and Settings\Administrator>type perltest.pl
#! /usr/bin/perl
use strict;
my $info = "asljdhashdklasjkl ;dajs;ld";
my @personal = split(//, $info);
print @personal[0..9];
C:\Documents and Settings\Administrator>