Доброго Ð·Ð´Ð¾Ñ€Ð¾Ð²ÑŒÑ!<br><br><div class="gmail_quote">3 Ð¼Ð°Ñ€Ñ‚а 2010 Ð³. 10:24 Ð¿Ð¾Ð»ÑŒÐ·Ð¾Ð²Ð°Ñ‚ель Sergey Homenkow <span dir="ltr">&lt;<a href="mailto:sergey@homenkow.ru">sergey@homenkow.ru</a>&gt;</span> Ð½Ð°Ð¿Ð¸ÑÐ°Ð»:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
У Ð¼ÐµÐ½Ñ:<br>This is perl, v5.10.1 (*) built for i486-linux-gnu-thread-multi<br><br><div class="gmail_quote">3 Ð¼Ð°Ñ€Ñ‚а 2010 Ð³. 12:20 Ð¿Ð¾Ð»ÑŒÐ·Ð¾Ð²Ð°Ñ‚ель Andrei <span dir="ltr">&lt;<a href="mailto:andrei.protasovitski@gmail.com" target="_blank">andrei.protasovitski@gmail.com</a>&gt;</span> Ð½Ð°Ð¿Ð¸ÑÐ°Ð»:<div class="im">
<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Доброго Ð·Ð´Ð¾Ñ€Ð¾Ð²ÑŒÑ!<br><br><div class="gmail_quote">3 Ð¼Ð°Ñ€Ñ‚а 2010 Ð³. 8:38 Ð¿Ð¾Ð»ÑŒÐ·Ð¾Ð²Ð°Ñ‚ель Sergey Homenkow <span dir="ltr">&lt;<a href="mailto:sergey@homenkow.ru" target="_blank">sergey@homenkow.ru</a>&gt;</span> Ð½Ð°Ð¿Ð¸ÑÐ°Ð»:<div>

<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Вот, ÐºÑÑ‚ати:<br><br>% perl -E &#39;use utf8; $a{x} = 2; say utf8::is_utf8(keys %a) ? 1 : 0&#39;<br>1<br>% perl -E &#39;use utf8; $a{&quot;x&quot;} = 2; say utf8::is_utf8(keys %a) ? 1 : 0&#39;<br>0<br><br>Это ÐºÐ¾ Ð²ÑÐµÐ¼ bareword Ð¾Ñ‚носиться.<br>


</blockquote></div><div><br>Однако<div><br><br>$ perl -E &#39;use utf8; $a{&#39;x&#39;} = 2; say utf8::is_utf8(keys %a) ? 1 : 0&#39;<br>1<br> </div></div></div></blockquote></div></div></blockquote><div><br>Если Ð²Ð½Ð¸Ð¼Ð°Ñ‚ельно Ð¿Ð¾ÑÐ¼Ð¾Ñ‚реть, Ñ‚о Ñ Ð²Ð·ÑÐ» Ð² Ð¾Ð´Ð¸Ð½Ð°Ñ€Ð½Ñ‹Ðµ ÐºÐ°Ð²Ñ‹Ñ‡ÐºÐ¸, Ð° Ð½Ðµ Ð² Ð´Ð²Ð¾Ð¹Ð½Ñ‹Ðµ. Ð­Ñ‚о Ð²Ð°Ð¶Ð½Ð¾. Ð˜ bareword Ñ‚ут Ð½Ð¸ Ð¿Ñ€Ð¸ Ñ‡Ñ‘м.<br>
<br>Дело Ð² Ñ‚ом, Ñ‡Ñ‚о <font face="courier new,monospace">use utf8;</font> Ð´ÐµÐ»Ð°ÐµÑ‚ Ð²ÑÐµ ÑÑ‚роковые ÐºÐ¾Ð½ÑÑ‚анты utf8, Ñ‚.е. ÑÑ‚авит Ð½Ð° ÑÑ‚року Ñ„лаг utf8. Ð¡Ñ‚рока Ð² Ð¾Ð´Ð¸Ð½Ð°Ñ€Ð½Ñ‹Ñ… ÐºÐ°Ð²Ñ‹Ñ‡ÐºÐ°Ñ…, Ñ€Ð°Ð²Ð½Ð¾ ÐºÐ°Ðº Ð¸ ÐºÐ»ÑŽÑ‡ Ñ…эша, ÑÑ‡Ð¸Ñ‚аются ÑÑ‚роковыми ÐºÐ¾Ð½ÑÑ‚антами, Ð² Ñ‚о Ð²Ñ€ÐµÐ¼Ñ ÐºÐ°Ðº ÑÑ‚рока Ð² Ð´Ð²Ð¾Ð¹Ð½Ñ‹Ñ… ÐºÐ°Ð²Ñ‹Ñ‡ÐºÐ°Ñ… ÑÑƒÑ‚ÑŒ ÑÑ‚роковое Ð²Ñ‹Ñ€Ð°Ð¶ÐµÐ½Ð¸Ðµ, ÐºÐ¾Ñ‚орое Ð¼Ð¾Ð¶ÐµÑ‚ ÑÐ¾Ð´ÐµÑ€Ð¶Ð°Ñ‚ÑŒ Ð¸Ð½Ñ‚ерполяцию. ÐŸÐ¾ ÑƒÐ¼Ð¾Ð»Ñ‡Ð°Ð½Ð¸ÑŽ Ñ€ÐµÐ·ÑƒÐ»ÑŒÑ‚ат Ñ‚акого Ð²Ñ‹Ñ€Ð°Ð¶ÐµÐ½Ð¸Ñ Ð½Ðµ utf8. ÐžÐ± ÑÑ‚ом Ð´Ð°Ð¶Ðµ ÑÐºÐ°Ð·Ð°Ð½Ð¾ Ð² <font face="courier new,monospace">perldoc utf8</font>:<br>
<br>Note that if you have bytes with the eighth bit on in your script (for example embedded Latin-1 in your string literals), &quot;use utf8&quot; will be unhappy since the bytes are most probably not well-formed UTF-X.  If you want to have such bytes under &quot;use utf8&quot;, you can disable this pragma until the end the block (or file, if at top level) by &quot;no utf8;&quot;.<br>
<br><br>Лично Ñ ÐºÐ°Ð²Ñ‹Ñ‡ÐºÐ¸ Ð² ÐºÐ»ÑŽÑ‡Ð°Ñ… ÑÑ‚авлю Ñ‚олько Ñ‚огда, ÐºÐ¾Ð³Ð´Ð° ÐºÐ»ÑŽÑ‡ ÑÐ¾Ð´ÐµÑ€Ð¶Ð¸Ñ‚ Ð¿Ñ€Ð¾Ð±ÐµÐ»Ñ‹. ÐÐ¾, Ñ‡ÐµÑÑ‚но Ð³Ð¾Ð²Ð¾Ñ€Ñ, Ñ Ð½Ðµ Ð¿Ð¾Ð¼Ð½ÑŽ, ÐºÐ¾Ð³Ð´Ð° Ð¼Ð½Ðµ Ð² Ð¿Ð¾ÑÐ»ÐµÐ´Ð½Ð¸Ð¹ Ñ€Ð°Ð· Ð¿Ð¾Ð½Ð°Ð´Ð¾Ð±Ð¸Ð»Ð¾ÑÑŒ Ð¿Ð¸ÑÐ°Ñ‚ÑŒ ÐºÐ»ÑŽÑ‡Ð¸ Ñ Ð¿Ñ€Ð¾Ð±ÐµÐ»Ð°Ð¼Ð¸ Ð² ÐºÐ¾Ð´Ðµ. <br clear="all"></div></div><br>-- <br>
Andrei Protasovitski<br>&lt; andrei[dot]protasovitski[at]gmail[dot]com &gt;<br>Diemen, Netherlands<br>