Как мне соединить скалярную переменную?

Question

$ab = "asljdhashdklasjkl ;dajs;ld";

Я хочу первые 10 символов из $ab.

Можно ли использовать функцию 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>