Member 13588253 Ответов: 1

Как получить значения столбцов, разделенные запятой в скрипте Perl

входная строка-это:

A,01/01/1900,12/30/9999, 2AB9500,A9,8999,BNVV

Я хочу получить 4-й элемент, удалить пространство для этого поля и присоединить его обратно к строке.

Что я уже пробовал:

Я пытался :

@capture = $string =~ /([^,]+)/g; # захват всех полей с пробелами
$захват[пос] =~ ы/^\S+С|Ь\+$//г;
$строка = присоединяйтесь к ",@захват;

1 Ответов

Рейтинг:
0

Mohibur Rashid

Если все ваше требование состоит в том, чтобы удалить пространство, то

$string =~ s/\s//g;

должны быть хорошо

если вы хотите отфильтровать только элемент index-4, оставьте все как есть, а затем попробуйте выполнить следующий пример
$line="A,01/01/1900,12/30/9999, 2AB9500,A9,8999,BNVV";
@arr=split /\//, $line; 
$arr[4] =~ s/\s//g; 
$line=join "/", @arr; 
print $line."\n";