Хорошо, я думаю, у меня есть решение для двойного индекса, а также изменение команды cas. Это делает работу:
perl -p -e 's/\[(\d+)\]\[(\d+)\]/"[" . ($1) . "][" . ($2+40) . "]"/ge' prova.txt
Кстати, не уверен, зачем мне . (1 доллар).
(точка с пробелом).