While I don't know how much of the difference between the perl and c code this makes up, after a cursory scan I do see a number of inefficiencies in the perl code. The first thing that jumps out at me are all the my calls inside the loops. If you are going to be declaring these variables so many times, it's more efficient to do so outside the loops. Here's a quick benchmark: 
Benchmark::cmpthese(5000, {
   'outside' => sub { 
         my $x; my $y; my @z; my $i; 
         for ($i = 0; $i < 1000; $i++) {
            $x = $i;
            $y = $x;
            @z = ($x, $y)
         }
            },
   'inside' => sub {
            for (my $i=0; $i < 1000; $i++) {
               my $x = $i; 
               my $y = $x; 
               my @z = ($x, $y)}
            }
});

         Rate  inside outside
inside  120/s      --    -13%
outside 138/s     15%      --

[download]
So in this example, declaring the my variables outside of the loop gives a 15% speed up. Another problem I found was calculating the loop limiting condition in the for loop. e.g., 
for(my $i = 64; $i < (scalar(@rddt) - (2 * $pond)); $i++){

[download]
Since it doesn't look like the size of @rddt or the value of $pond is changing, you should do that calculation outside of the loop. Here are the benchmarks: 
@rddt = (1) x 1000;
$pond = 32;

Benchmark::cmpthese(500, {
   'inside' => sub { 
            for ( my $i = 64 ; $i < ( scalar(@rddt) - ( 2 * $pond ) ) 
+; $i++ ) {
               $x++;
            }
               },

   'outside' => sub {
            $limit = scalar(@rddt) - ( 2 * $pond );
            for ( my $i = 64 ; $i <  $limit ; $i++ ) {
               $x++;
            }
               },
});

inside  273/s      --    -39%
outside 450/s     65%      --

[download]
A 65% speed up here. There are probably lots of other optimizations that you could do in this perl code. Those two were the most obvious.

In reply to Re: Re: Confirming what we already knew by genecutl
in thread Confirming what we already knew by AssFace

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.