Описание тега ghost-in-the-shell-arise
Перл-Пи -Е С|\Д+|$&/2|е $. == 1; закрыть АГДУ если EOF' ./*.тхт
Бы заменить первую последовательность десятичных цифр в первой строке каждого не скрытого текстовый
файл в текущем каталоге, с канонической десятичное представление половины соответствующий номер (для 3 006, 3.5 для 007 например).
Если число очень большое (например, больше, чем 1e20), на Perl
может перейти в инженерной нотации (5е+19).
Очевидно, что такой подход действует только для чисел в десятичной системе счисления. При нанесении .1
это даст .5
вместо 0.05
; при нанесении на 1.5, это даст 0.5.5
вместо 0.75
; при применении к 0х10
, это даст 0х10
(только 0
делится пополам), а не 8 или 0x8 и так далее.
Если вы хотели обрабатывать десятичные числа в любой системе счисления (1, 010 (значение 10, а не восьмеричное 8), -1.123, 2.23 е-4, инф, бесконечность, Нана...)), нужно адаптировать подходящее регулярное выражение, как:
с {выражение(\D*\.\д+|и\D+\.?)(е[-+]?\д+)?|Нэн|инф(inity)?}{$&/2}, т. е.
Или сделать некоторые предположения о том, где этот номер находится на линии, как будто в первый последовательность несамостоятельные знаки:
С {и\S+}{$&/2}е