Здравствуйте, DemAS, Вы писали:
DAS> Есть исходная строка $source. Есть 2 целых числа — $begin и $end.
DAS> Есть подстрока $inline.
DAS> Надо заменить фрагмент $source начиная с $begin и заканчивая $end на $inline.
my $source = "1234567890";
my $inline = "inline";
my ($begin, $end) = (5, 8);
substr($source, $begin, $end - $begin) = $inline;
... << RSDN@Home 1.1.4 @@subversion >>
