<?xml version="1.0" encoding="utf-8"?>
<rss version="0.91">
	<channel>
		<title>НГС.Форум: Вопрос по perl</title>
		<description>Форум на NGS.RU</description>
		<copyright>ЗАО «НГС»</copyright>
		<link>https://forum.ngs23.ru/</link>
						<item>
			<title>Re: Вопрос по perl</title>
			<link>https://forum.ngs23.ru/board/programming/flat/1870848022/</link>
			<author>NNP</author>
			<description>Вообщем я сам дурак, вопрос решил. </description>
			<category>programming</category>
			<pubDate>Wed, 06 Apr 2005 08:47:46 +0400</pubDate>
		</item>
				<item>
			<title>Вопрос по perl</title>
			<link>https://forum.ngs23.ru/board/programming/flat/1870847885/</link>
			<author>NNP</author>
			<description>Обьясните мне дураку, что случилось.
вроде простой код

$text =4333;
if ($text = ~ /(\d)/)
{
   print $1;
}
else
{
   print "dasdasdaddd";
}

print...</description>
			<category>programming</category>
			<pubDate>Wed, 06 Apr 2005 07:48:11 +0400</pubDate>
		</item>
					</channel>
</rss>