Что соответствует этому регулярному выражению Perl?

Question

Я начал изучать регулярные выражения, но в нем так много элементов.Что это соответствует?

$x =~s/\.?0+$//;

Answer 1

Удаляет период и конечные нули с конца строки, изменяя «24,00» на «24».В кусках:

s/  substitute operation
\.  literal period, not a placeholder
?   Period is optional (by the way, probably a bug)
0+  one or more zeros
$   all of this at the end of the string.
//  replace it with nothing, i.e.,  just delete it.

Ошибка?Ну, «2400» будет изменено на «24».Вероятно, не желаемое поведение.

Answer 2

Соответствует нулю или одной буквальной точке, за которой следует один или несколько нулей, а затем конец строки.

\.     #A literal dot
?      #Zero or one of the previous character
0+     #One or more zeros
$      #End of string

Answer 3

Для этого есть приложение !