<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Perl Question in Operating System - HP-UX</title>
    <link>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712119#M721583</link>
    <description>$year = substr(THATVAR,0,2)&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;substr(STRING, STARTINGPOS, LENGTH2CUT)&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;live free or die&lt;BR /&gt;harry</description>
    <pubDate>Fri, 26 Apr 2002 15:24:28 GMT</pubDate>
    <dc:creator>harry d brown jr</dc:creator>
    <dc:date>2002-04-26T15:24:28Z</dc:date>
    <item>
      <title>Perl Question</title>
      <link>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712118#M721582</link>
      <description>I am new to Perl and am looking for the equivalent command to the Unix cut command.  I have a date in the format 020426 and want to cut the first to digits and put them in a variable called year.  Is there an easy way in Perl to do this?  Also, can you give any recommendations as to where I could find some good easy Perl example programs for me to work with?</description>
      <pubDate>Fri, 26 Apr 2002 15:20:19 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712118#M721582</guid>
      <dc:creator>Jason Berendsen</dc:creator>
      <dc:date>2002-04-26T15:20:19Z</dc:date>
    </item>
    <item>
      <title>Re: Perl Question</title>
      <link>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712119#M721583</link>
      <description>$year = substr(THATVAR,0,2)&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;substr(STRING, STARTINGPOS, LENGTH2CUT)&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;live free or die&lt;BR /&gt;harry</description>
      <pubDate>Fri, 26 Apr 2002 15:24:28 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712119#M721583</guid>
      <dc:creator>harry d brown jr</dc:creator>
      <dc:date>2002-04-26T15:24:28Z</dc:date>
    </item>
    <item>
      <title>Re: Perl Question</title>
      <link>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712120#M721584</link>
      <description>Thanks alot Harry that was exactly what I needed!  Well worth 10 points.&lt;BR /&gt;&lt;BR /&gt;Jason</description>
      <pubDate>Fri, 26 Apr 2002 15:29:36 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-hp-ux/perl-question/m-p/2712120#M721584</guid>
      <dc:creator>Jason Berendsen</dc:creator>
      <dc:date>2002-04-26T15:29:36Z</dc:date>
    </item>
  </channel>
</rss>

