<commit_before>[% page.banner = BLOCK %]The Perl Directory at <SPAN CLASS="title">Perl.org</span>[% END %]
[% page.style = "perl-directory.html" %]
[% page.site = "perl.org" %]
[% page.title = "The Perl Directory" %]
[% page.description = 'The Perl Directory at perl.org.  Links and other helpful resources for new and experienced Perl programmers.' %]
[% page.morecontacts = BLOCK%]
<BR><A HREF="http://noc.perl.org">The Perl NOC</A>
[% END %]
[% page.sidebar = BLOCK%]
  <DIV class="MENU">
  <H3>Current Release: <a href="http://dev.perl.org/perl5/news/2006/perl-5.8.8.html">5.8.8</a></h3>

  <center>
  <a href="/get.html"><img src="images/buttons/download_perl_grey.gif" width="102" height="42"
                border=0 alt="Download Perl"></a>
  </center>
  </DIV>

<DIV class="NAVITEM">
<H3>New to Perl?</H3>
<A href="http://learn.perl.org">See our Resources for Perl Beginners</a>

  <H3>What is Perl?</h3>
   Perl is a stable, cross platform programming language. 
   It is used for mission critical 
   projects in the public and private sectors and is widely used to 
   program web applications of all needs.  
   </DIV>
  <DIV class="NAVITEM" ALIGN=CENTER>

<a href="siteinfo.html#sponsors"><b>Sponsor:</b></a><br>
[% INCLUDE "tpl/sponsor-rotato.html" %]
  </DIV>
[% END %]


<table width="530" cellspacing="10" cellpadding="5" border="0">
  <tr valign="TOP">
    <td  valign="top" width="265"  class="NOVERTPAD">
    <A href="about.html" CLASS="TOPIC">About Perl</a>
    <DIV CLASS="ITEMS">
    <a href="http://learn.perl.org/">learn</a>, 
    <a href="http://history.perl.org/">history</a>,
    <a href="http://perl.oreilly.com/news/success_stories.html">success stories</a>,<br>
    <a href="get.html">downloads</a><br>
    <P>
    </div>

    <a href="http://cpan.perl.org/" CLASS="TOPIC">CPAN</a>
    <DIV CLASS="ITEMS">
    <a href="http://search.cpan.org/">Search</a>,
    <a href="http://cpanratings.perl.org/">CPAN&nbsp;Ratings</a>,
    <a href="http://www.annocpan.org/">Annotated&nbsp;CPAN</a>
    <P>
    </div>


    <a href="http://dev.perl.org/" CLASS="TOPIC">Perl Core Development</a>
    <DIV CLASS="ITEMS">
    <a href="http://dev.perl.org/perl5/">Perl 5</a>,
    <a href="http://dev.perl.org/perl6/">Perl 6</a>, 
    <a href="http://www.parrotcode.org/">Parrot</a>, 
    <a href="http://www.pugscode.org/">Pugs</A>,
    <a href="http://bugs.perl.org/">bugs</a>
    <br><br>
    <P>
    </div>
    
    <a href="app.html" CLASS="TOPIC">Application Programming</a>
    <DIV CLASS="ITEMS">
    <a href="http://search.cpan.org/modlist/">modules</a>, 
    <a href="http://dbi.perl.org/">database</a>, 
    <a href="http://perl.apache.org/">mod_perl</a>
    <P>
    </div>
    
    <a href="events.html" CLASS="TOPIC">Events and Conferences</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.yapc.org/">YAPC</a>, 
    <a href="http://conferences.oreillynet.com/oscon/">The Perl Conference</a>,
    <br>
    <a href="http://www.pm.org/">local meetings</a>,
    <a href="/advocacy/summerofcode/">Summer of Code</A>
    </div>
    </td>
    
    <td class="NOVERTPAD" width="265">
    <a href="docs.html" CLASS="TOPIC">Online Documentation</a>
    <DIV CLASS="ITEMS">
    <a href="http://perldoc.perl.org/perl.html">manual pages</a>, 
    <a href="http://faq.perl.org/">FAQs</a>, 
    <a href="http://www.nntp.perl.org/group/">mailing list archives</a>
    <P>
    </div>
    
    <a href="books.html" CLASS="TOPIC">Books and Articles</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.theperlreview.com/">the Perl Review</a>, 
    <a href="http://www.perl.com">Perl.com</a>,
    <a href="http://www.perlcast.com">PerlCast</A>,
    <a href="http://use.perl.org/search.pl?topic=29">reviews</a>,
    <a href="/books/library.html">library</a>
    <P>
    </div>

    <a href="community.html" CLASS="TOPIC">The Perl Community</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.pm.org/">Perl Monger user groups</a>,
    <a href="http://www.perlmonks.org/">Perl&nbsp;Monks</a>,
    <a href="http://lists.perl.org/">Mailing lists</a>,
    <a href="http://planet.perl.org/">Planet Perl</a>,
    <a href="http://use.perl.org/">use Perl;</a>
    <P>
    </div>
    
    <a href="http://www.perlfoundation.org" CLASS="TOPIC">The Perl Foundation</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.perlfoundation.org/contribute.html"
      >contribute</a>,
    <a href="http://www.perlfoundation.org/pr/TPFPK.pdf">press kit (pdf)</a>,
    <a href="http://news.perlfoundation.org/">blog</a>

    <P>

    </div>

  </td>
 </tr>

[% MACRO quicknews(shortname,count) BLOCK %]
[%- UNLESS count %]
  [%  count = 2 %]
[% END %]
[%- TRY %]
   [%- USE news = XML.RSS("${root}/var/rss/${shortname}.rss") %]
   [% FOREACH item = news.items %]
       - <a href="[% item.link | html %]">[% item.title %]</a><BR>
       [% count = count - 1 %]
       [% LAST IF count == 0 %]
    [% END %]
[%- CATCH %]
    [Error Processing Directive]
  [%- FILTER stderr %][% error.info %][% END %]
[%- END %]
[%- END %]


  <tr>
   <td colspan=2  class="NOVERTPAD">
    <a href="news.html" CLASS="TOPIC">News</a>
    <DIV CLASS="ITEMS">
     <table cellspacing=0 border=0 width="100%">
      <tr>
       <td width="15%"><A HREF="http://use.perl.org/"><b>use Perl;</b></A></td>
       <td>[% quicknews ("useperl") %]</td> 
     </tr>
     <tr>
       <td><A HREF="http://www.perl.com/"><b>perl.com</b></A></td>
       <td>[% quicknews ("perlcom") %]</td>
     </tr>
     <tr>
      <td><A HREF="http://cpan.perl.org/"><b>CPAN</b></A></td>
      <td>[% quicknews ("cpanrecent") %]</td>
     </tr>
     </table>
    </DIV>
   </td>
  </tr>
 
  <tr>
  <td colspan=22 valign="BOTTOM" align="center">
   [%- beg = PROCESS tpl/index_beg_box.html -%]
   <H3 class="BEGINNER">[% beg %]</h3>
  </td>
</tr>

</table>

<commit_msg> r1443@wombat:  rspier | 2007-07-11 23:02:05 -0700  Demo a CSE<commit_after>[% page.banner = BLOCK %]The Perl Directory at <SPAN CLASS="title">Perl.org</span>[% END %]
[% page.style = "perl-directory.html" %]
[% page.site = "perl.org" %]
[% page.title = "The Perl Directory" %]
[% page.description = 'The Perl Directory at perl.org.  Links and other helpful resources for new and experienced Perl programmers.' %]
[% page.morecontacts = BLOCK%]
<BR><A HREF="http://noc.perl.org">The Perl NOC</A>
[% END %]
[% page.sidebar = BLOCK%]
  <DIV class="MENU">
  <H3>Current Release: <a href="http://dev.perl.org/perl5/news/2006/perl-5.8.8.html">5.8.8</a></h3>

  <center>
  <a href="/get.html"><img src="images/buttons/download_perl_grey.gif" width="102" height="42"
                border=0 alt="Download Perl"></a>
  </center>
  </DIV>

<DIV class="NAVITEM">
<H3>New to Perl?</H3>
<A href="http://learn.perl.org">See our Resources for Perl Beginners</a>

  <H3>What is Perl?</h3>
   Perl is a stable, cross platform programming language. 
   It is used for mission critical 
   projects in the public and private sectors and is widely used to 
   program web applications of all needs.  
   </DIV>
  <DIV class="NAVITEM" ALIGN=CENTER>

<a href="siteinfo.html#sponsors"><b>Sponsor:</b></a><br>
[% INCLUDE "tpl/sponsor-rotato.html" %]
  </DIV>
[% END %]


<table width="530" cellspacing="10" cellpadding="5" border="0">
  <tr valign="TOP">
    <td  valign="top" width="265"  class="NOVERTPAD">
    <A href="about.html" CLASS="TOPIC">About Perl</a>
    <DIV CLASS="ITEMS">
    <a href="http://learn.perl.org/">learn</a>, 
    <a href="http://history.perl.org/">history</a>,
    <a href="http://perl.oreilly.com/news/success_stories.html">success stories</a>,<br>
    <a href="get.html">downloads</a><br>
    <P>
    </div>

    <a href="http://cpan.perl.org/" CLASS="TOPIC">CPAN</a>
    <DIV CLASS="ITEMS">
    <a href="http://search.cpan.org/">Search</a>,
    <a href="http://cpanratings.perl.org/">CPAN&nbsp;Ratings</a>,
    <a href="http://www.annocpan.org/">Annotated&nbsp;CPAN</a>
    <P>
    </div>


    <a href="http://dev.perl.org/" CLASS="TOPIC">Perl Core Development</a>
    <DIV CLASS="ITEMS">
    <a href="http://dev.perl.org/perl5/">Perl 5</a>,
    <a href="http://dev.perl.org/perl6/">Perl 6</a>, 
    <a href="http://www.parrotcode.org/">Parrot</a>, 
    <a href="http://www.pugscode.org/">Pugs</A>,
    <a href="http://bugs.perl.org/">bugs</a>
    <br><br>
    <P>
    </div>
    
    <a href="app.html" CLASS="TOPIC">Application Programming</a>
    <DIV CLASS="ITEMS">
    <a href="http://search.cpan.org/modlist/">modules</a>, 
    <a href="http://dbi.perl.org/">database</a>, 
    <a href="http://perl.apache.org/">mod_perl</a>
    <P>
    </div>
    
    <a href="events.html" CLASS="TOPIC">Events and Conferences</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.yapc.org/">YAPC</a>, 
    <a href="http://conferences.oreillynet.com/oscon/">The Perl Conference</a>,
    <br>
    <a href="http://www.pm.org/">local meetings</a>,
    <a href="/advocacy/summerofcode/">Summer of Code</A>
    </div>
    </td>
    
    <td class="NOVERTPAD" width="265">
    <a href="docs.html" CLASS="TOPIC">Online Documentation</a>
    <DIV CLASS="ITEMS">
    <a href="http://perldoc.perl.org/perl.html">manual pages</a>, 
    <a href="http://faq.perl.org/">FAQs</a>, 
    <a href="http://www.nntp.perl.org/group/">mailing list archives</a>
    <P>
    </div>
    
    <a href="books.html" CLASS="TOPIC">Books and Articles</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.theperlreview.com/">the Perl Review</a>, 
    <a href="http://www.perl.com">Perl.com</a>,
    <a href="http://www.perlcast.com">PerlCast</A>,
    <a href="http://use.perl.org/search.pl?topic=29">reviews</a>,
    <a href="/books/library.html">library</a>
    <P>
    </div>

    <a href="community.html" CLASS="TOPIC">The Perl Community</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.pm.org/">Perl Monger user groups</a>,
    <a href="http://www.perlmonks.org/">Perl&nbsp;Monks</a>,
    <a href="http://lists.perl.org/">Mailing lists</a>,
    <a href="http://planet.perl.org/">Planet Perl</a>,
    <a href="http://use.perl.org/">use Perl;</a>
    <P>
    </div>
    
    <a href="http://www.perlfoundation.org" CLASS="TOPIC">The Perl Foundation</a>
    <DIV CLASS="ITEMS">
    <a href="http://www.perlfoundation.org/contribute.html"
      >contribute</a>,
    <a href="http://www.perlfoundation.org/pr/TPFPK.pdf">press kit (pdf)</a>,
    <a href="http://news.perlfoundation.org/">blog</a>

    <P>

    </div>

  </td>
 </tr>

[% MACRO quicknews(shortname,count) BLOCK %]
[%- UNLESS count %]
  [%  count = 2 %]
[% END %]
[%- TRY %]
   [%- USE news = XML.RSS("${root}/var/rss/${shortname}.rss") %]
   [% FOREACH item = news.items %]
       - <a href="[% item.link | html %]">[% item.title %]</a><BR>
       [% count = count - 1 %]
       [% LAST IF count == 0 %]
    [% END %]
[%- CATCH %]
    [Error Processing Directive]
  [%- FILTER stderr %][% error.info %][% END %]
[%- END %]
[%- END %]


  <tr>
   <td colspan=2  class="NOVERTPAD">
    <a href="news.html" CLASS="TOPIC">News</a>
    <DIV CLASS="ITEMS">
     <table cellspacing=0 border=0 width="100%">
      <tr>
       <td width="15%"><A HREF="http://use.perl.org/"><b>use Perl;</b></A></td>
       <td>[% quicknews ("useperl") %]</td> 
     </tr>
     <tr>
       <td><A HREF="http://www.perl.com/"><b>perl.com</b></A></td>
       <td>[% quicknews ("perlcom") %]</td>
     </tr>
     <tr>
      <td><A HREF="http://cpan.perl.org/"><b>CPAN</b></A></td>
      <td>[% quicknews ("cpanrecent") %]</td>
     </tr>
     </table>
    </DIV>
   </td>
  </tr>
 
  <tr>
  <td colspan=22 valign="BOTTOM" align="center">
   [%- beg = PROCESS tpl/index_beg_box.html -%]
   <H3 class="BEGINNER">[% beg %]</h3>
  </td>
</tr>

</table>

<center>
<!-- Use of this code assumes agreement with the Google Custom Search Terms of Service. -->
<!-- The terms of service are available at http://www.google.com/coop/docs/cse/tos.html -->
<b>Search Perl related sites:</b><br>
<form name="cse" id="searchbox_demo" action="http://www.google.com/cse">
  <input type="hidden" name="cref" value="" />
  <input name="q" type="text" size="40" />
  <input type="submit" name="sa" value="Search" />
</form>
<script type="text/javascript" src="http://www.google.com/cse/tools/onthefly?form=searchbox_demo"></script>

</center>
{'fraction_non_alphanumeric': 0.23450531479967293, 'fraction_numerical': 0.011283728536385935, 'mean_word_length': 3.123735670937289, 'pattern_counts': {'":': 0, '<': 431, '<?xml version=': 0, '>': 431, 'https://': 0, 'lorem ipsum': 0, 'www.': 33, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 8, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '3698863', 'n_tokens_mistral': 5188, 'n_tokens_neox': 4718, 'n_words': 858}