<?xml version='1.0' encoding="utf-8"?>
      <rss version='2.0'>
      <channel>
      <title>Форум на Исходниках.RU</title>
      <link>https://forum.sources.ru</link>
      <description>Форум на Исходниках.RU</description>
      <generator>Форум на Исходниках.RU</generator>
  	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=372471&amp;view=findpost&amp;p=3275097</guid>
        <pubDate>Fri, 15 Feb 2013 11:59:54 +0000</pubDate>
        <title>Как в перл разложить подсеть на ip адреса?</title>
        <link>https://forum.sources.ru/index.php?showtopic=372471&amp;view=findpost&amp;p=3275097</link>
        <description><![CDATA[Unknown_Error: Оказывается, все просто:<br>
<br>
<div class='tag-quote'><span class='tag-quote-prefix'>Цитата</span> <div class='quote '><br>
use Net::IP;<br>
<br>
sub getIPRange<br>
{<br>
        my @array = ();<br>
        my &#036;ip = new Net::IP (shift) || die Net::IP::Error();<br>
        my &#036;index = 0;<br>
<br>
        while (++&#036;ip)<br>
        {<br>
                if (&#036;ip + 1)<br>
                {<br>
                        &#036;array[&#036;index++] = &#036;ip-&gt;ip();<br>
                }<br>
        }<br>
<br>
        return @array;<br>
}<br>
<br>
@my_array = getIPRange(&#39;192.168.0.0/24&#39;);<br>
</div></div>]]></description>
        <author>Unknown_Error</author>
        <category>Perl</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=372471&amp;view=findpost&amp;p=3274726</guid>
        <pubDate>Thu, 14 Feb 2013 17:35:22 +0000</pubDate>
        <title>Как в перл разложить подсеть на ip адреса?</title>
        <link>https://forum.sources.ru/index.php?showtopic=372471&amp;view=findpost&amp;p=3274726</link>
        <description><![CDATA[Gonarh: Можно допилить под себя <a class='tag-url' href='http://jodies.de/ipcalc' target='_blank'>вот это</a>]]></description>
        <author>Gonarh</author>
        <category>Perl</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=372471&amp;view=findpost&amp;p=3274523</guid>
        <pubDate>Thu, 14 Feb 2013 12:57:59 +0000</pubDate>
        <title>Как в перл разложить подсеть на ip адреса?</title>
        <link>https://forum.sources.ru/index.php?showtopic=372471&amp;view=findpost&amp;p=3274523</link>
        <description><![CDATA[Unknown_Error: Добрый день.<br>Подскажите, как в перл скрипте разложить подсеть на ip адреса?<br>На входе имеем ip: 192.168.100.0 mask 24<br>Как ее разложить на:<br>192.168.100.1<br>192.168.100.2<br>...<br>192.168.100.254<br><br>?]]></description>
        <author>Unknown_Error</author>
        <category>Perl</category>
      </item>
	
      </channel>
      </rss>
	