<?xml version="1.0" encoding="koi8-r"?>
<rss version="0.91">
<channel>
    <title>OpenForum RSS: вопросик по perl</title>
    <link>https://www.opennet.ru/openforum/vsluhforumID9/6891.html</link>
    <description>Господа, а подскажите плиз как из system.sysUpTime.0 = Timeticks: (826652) 2:17:46.52 как отсюда вытащить средствами perl 826652&lt;br&gt;</description>

<item>
    <title>вопросик по perl (Дмитрий)</title>
    <link>https://www.opennet.ru/openforum/vsluhforumID9/6891.html#3</link>
    <pubDate>Tue, 30 Oct 2007 11:43:35 GMT</pubDate>
    <description>&amp;gt;&amp;gt;$value = &apos;Timeticks: (826652) 2:17:46.52&apos;; &lt;br&gt;&amp;gt;&amp;gt;&lt;br&gt;&amp;gt;&amp;gt;if ( $value =~ /&#092;((&#091;0-9&#093;&#123;1,&#125;)&#092;)/ ) &lt;br&gt;&amp;gt;&amp;gt;&#123; $n = $1 &#125; &lt;br&gt;&amp;gt;&amp;gt;&lt;br&gt;&amp;gt;&amp;gt;print $1; # 826652 &lt;br&gt;&amp;gt;&lt;br&gt;&amp;gt;Вообще &#091;0-9&#093;&#123;1,&#125; можно заменить на &#092;d+, а еще лучше в регекс включить &lt;br&gt;&amp;gt;часть строки, например так: /&#091;Tt&#093;imeticks:&#092;s+&#092;((&#092;d+)&#092;)/ &lt;br&gt;&lt;br&gt;su-2.05b# snmpwalk -v 2c -c XXX xxx.xxx.xxx.xxx system.sysUpTime.0&lt;br&gt;system.sysUpTime.0 = Timeticks: (9679172) 1 day, 2:53:11.72&lt;br&gt;&lt;br&gt;&lt;br&gt;Это вот отсюда имелось в виду&lt;br&gt;</description>
</item>

<item>
    <title>вопросик по perl (angra)</title>
    <link>https://www.opennet.ru/openforum/vsluhforumID9/6891.html#2</link>
    <pubDate>Tue, 30 Oct 2007 03:34:27 GMT</pubDate>
    <description>&amp;gt;$value = &apos;Timeticks: (826652) 2:17:46.52&apos;; &lt;br&gt;&amp;gt;&lt;br&gt;&amp;gt;if ( $value =~ /&#092;((&#091;0-9&#093;&#123;1,&#125;)&#092;)/ ) &lt;br&gt;&amp;gt;&#123; $n = $1 &#125; &lt;br&gt;&amp;gt;&lt;br&gt;&amp;gt;print $1; # 826652 &lt;br&gt;&lt;br&gt;Вообще &#091;0-9&#093;&#123;1,&#125; можно заменить на &#092;d+, а еще лучше в регекс включить часть строки, например так: /&#091;Tt&#093;imeticks:&#092;s+&#092;((&#092;d+)&#092;)/&lt;br&gt;</description>
</item>

<item>
    <title>вопросик по perl (tx2)</title>
    <link>https://www.opennet.ru/openforum/vsluhforumID9/6891.html#1</link>
    <pubDate>Mon, 29 Oct 2007 22:44:14 GMT</pubDate>
    <description>$value = &apos;Timeticks: (826652) 2:17:46.52&apos;;&lt;br&gt;&lt;br&gt;if ( $value =~ /&#092;((&#091;0-9&#093;&#123;1,&#125;)&#092;)/ )&lt;br&gt;&#123; $n = $1 &#125;&lt;br&gt;&lt;br&gt;print $1; # 826652&lt;br&gt;</description>
</item>

</channel>
</rss>
