<html>
  <head>
    <meta content="text/html; charset=utf-8" http-equiv="Content-Type">
  </head>
  <body bgcolor="#FFFFFF" text="#000000">
    <div class="moz-cite-prefix">Можно поменяй буквы g r местами.<br>
      А еще s///r появилась только в 5.014, а не в 5.014.<br>
      <br>
      28.05.2015 7:33, Nikolay Mishin пишет:<br>
    </div>
    <blockquote cite="mid:1900021432787621@web24h.yandex.ru" type="cite">
      <div>Привет MoscowPM!</div>
      <div> </div>
      <div>Есть код:</div>
      <div> </div>
      <div>#!/usr/bin/perl -w<br>
        use strict;<br>
        use warnings;<br>
        use 5.010;<br>
        <br>
        my $comment_pred = 'COUNTRY_SU';<br>
        for my $coutry (qw/SU USA GB RU/) {<br>
            my $comment = $comment_pred =~
        s/(COUNTRY_)SU/$1${coutry}/rg;<br>
            say $comment;<br>
        }</div>
      <div>после</div>
      <div>perltidy -b test_perltidy.pl</div>
      <div>  my $comment = $comment_pred =~ s/(COUNTRY_)SU/$1${coutry}/
        rg;</div>
      <div>r отлетает</div>
      <div><a moz-do-not-send="true"
          href="https://github.com/mishin/perltidy/issues/1">https://github.com/mishin/perltidy/issues/1</a></div>
      <div> </div>
      <div> это можно как-нибудь починить?</div>
      <div>Спасибо.</div>
      <div>-- </div>
      <div>С уважением</div>
      <div>Николай Мишин</div>
      <div> </div>
      <div> </div>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <br>
    </blockquote>
    <br>
  </body>
</html>