<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Комментарии на: Data::Dumper и текст в UTF-8</title>
	<atom:link href="http://www.bloged.org/2010/11/datadumper-utf-8.html/feed" rel="self" type="application/rss+xml" />
	<link>http://www.bloged.org/2010/11/datadumper-utf-8.html</link>
	<description>Я надеюсь здесь собрать все, что мне кажется интересным. Возможно, это понравится и Вам.</description>
	<lastBuildDate>Sun, 16 May 2021 14:00:50 +0000</lastBuildDate>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.5</generator>
	<item>
		<title>От: Игорь</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-1769</link>
		<dc:creator>Игорь</dc:creator>
		<pubDate>Mon, 12 Apr 2021 08:45:13 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-1769</guid>
		<description><![CDATA[Можно еще так:
use utf8;
use strict;
use warnings;

use Data::Dumper;
my $data = {
	&#039;country&#039;  =&gt; &#039;Россия&#039;,
	&#039;city&#039;     =&gt; &#039;Москва&#039;,
	&#039;terminal&#039; =&gt; &#039;&#039;,
	&#039;airport&#039;  =&gt; &#039;Домодедово&#039;,
	&#039;code&#039;     =&gt; &#039;DME&#039;
};

my $dump = Dumper($data);
$dump =~ s/\\x\{([a-f0-9]{2,})\}/chr(hex($1))/ge;
print $dump;]]></description>
		<content:encoded><![CDATA[<p>Можно еще так:<br />
use utf8;<br />
use strict;<br />
use warnings;</p>
<p>use Data::Dumper;<br />
my $data = {<br />
	&#8216;country&#8217;  =&gt; &#8216;Россия&#8217;,<br />
	&#8216;city&#8217;     =&gt; &#8216;Москва&#8217;,<br />
	&#8216;terminal&#8217; =&gt; &#8221;,<br />
	&#8216;airport&#8217;  =&gt; &#8216;Домодедово&#8217;,<br />
	&#8216;code&#8217;     =&gt; &#8216;DME&#8217;<br />
};</p>
<p>my $dump = Dumper($data);<br />
$dump =~ s/\\x\{([a-f0-9]{2,})\}/chr(hex($1))/ge;<br />
print $dump;</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Николай</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-1756</link>
		<dc:creator>Николай</dc:creator>
		<pubDate>Sun, 27 Dec 2020 15:04:29 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-1756</guid>
		<description><![CDATA[До сих пор актуально, спасибо!]]></description>
		<content:encoded><![CDATA[<p>До сих пор актуально, спасибо!</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Алексей</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-862</link>
		<dc:creator>Алексей</dc:creator>
		<pubDate>Thu, 28 Sep 2017 08:45:24 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-862</guid>
		<description><![CDATA[Проблема в том, что используется XS версия.
Чтобы ее отключить надо добавить

$Data::Dumper::Useperl = 1;]]></description>
		<content:encoded><![CDATA[<p>Проблема в том, что используется XS версия.<br />
Чтобы ее отключить надо добавить</p>
<p>$Data::Dumper::Useperl = 1;</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Алексей</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-861</link>
		<dc:creator>Алексей</dc:creator>
		<pubDate>Thu, 28 Sep 2017 08:36:44 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-861</guid>
		<description><![CDATA[Перестало работать]]></description>
		<content:encoded><![CDATA[<p>Перестало работать</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Anonymous</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-251</link>
		<dc:creator>Anonymous</dc:creator>
		<pubDate>Wed, 21 Mar 2012 05:59:21 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-251</guid>
		<description><![CDATA[Хорошие советы - как классика, никогда не стареют.&lt;br /&gt;21 век, *ля]]></description>
		<content:encoded><![CDATA[<p>Хорошие советы &#8211; как классика, никогда не стареют.<br />21 век, *ля</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Anonymous</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-170</link>
		<dc:creator>Anonymous</dc:creator>
		<pubDate>Fri, 03 Dec 2010 07:04:03 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-170</guid>
		<description><![CDATA[Кстати, все работает, я косякнул - написал Dumper::Data::qqoute вместо Dumper::Data::qquote&lt;br /&gt;Щас исправил, все заработало]]></description>
		<content:encoded><![CDATA[<p>Кстати, все работает, я косякнул &#8211; написал Dumper::Data::qqoute вместо Dumper::Data::qquote<br />Щас исправил, все заработало</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Ed</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-169</link>
		<dc:creator>Ed</dc:creator>
		<pubDate>Thu, 02 Dec 2010 16:12:23 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-169</guid>
		<description><![CDATA[Я проверял на Perl 5.10.0]]></description>
		<content:encoded><![CDATA[<p>Я проверял на Perl 5.10.0</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: Anonymous</title>
		<link>http://www.bloged.org/2010/11/datadumper-utf-8.html#comment-168</link>
		<dc:creator>Anonymous</dc:creator>
		<pubDate>Thu, 02 Dec 2010 15:18:28 +0000</pubDate>
		<guid isPermaLink="false">http://bloged.org/2010/11/datadumper-%d0%b8-%d1%82%d0%b5%d0%ba%d1%81%d1%82-%d0%b2-utf-8.html#comment-168</guid>
		<description><![CDATA[perl 5.8.9&lt;br /&gt;у меня это не работает&lt;br /&gt;хотя тоже этот способ увидел на perlmonks, но что-то никак (((]]></description>
		<content:encoded><![CDATA[<p>perl 5.8.9<br />у меня это не работает<br />хотя тоже этот способ увидел на perlmonks, но что-то никак (((</p>
]]></content:encoded>
	</item>
</channel>
</rss>
