Исправление Vlad-76, 27.07.18 17:02 (текущая версия) :
use Data::Dumper; my $st = "1 jkf 23"; my @a=split(" ", $st); print Dumper $a[1]; # например
Исходная версия Vlad-76, 27.07.18 17:01:
use Data::Dumper; my $st = «1 jkf 23»; my @a=split(" ", $st); print Dumper $a[1]; # например