переменная для разделителя полей в perl

В awk я могу написать: awk -F: 'BEGIN {OFS = FS} ...'

Что эквивалентно FS в Perl ]? Я хотел бы написать обновление

perl -F: -lane 'BEGIN {$, = [what?]} ...'

с примером:

echo a:b:c:d | awk -F: 'BEGIN {OFS = FS} {$2 = 42; print}'
echo a:b:c:d | perl -F: -ane 'BEGIN {$, = ":"} $F[1] = 42; print @F'

Оба вывода a: 42: c: d

Я бы предпочел не жестко кодировать : в Perl BEGIN блок, но ссылка на то место, где параметр -F сохраняет свой аргумент.