Wykonywanie podstawienia wyrażeń regularnych Perl
Zakładając, że mam adres IP10.23.233.34
Chciałbym po prostu zamienić233
dla234
. Pierwszy, drugi i ostatni oktet są nieznane. Trzeci oktet też jest233
lub234
. Chcę wykonać podstawienie w taki sposób, aby pasowało do IP, sub i zachowywało wszystko inne, jednocześnie przełączając ostatni oktet. Na przykład:
Wkład:10.23.233.34
s/^(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){}233\.(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)/^(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){}234\.(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)/
Wydajność:10.23.234.34