The data i've got output was not yet what i expected. So to debug, i've sorted the data en printed it

@$points = sort { $a->[3] <=> $b->[3] } @$points; foreach (@$points) { print " $_->[3] $_->[0] $_->[1] $_->[2] \n"; }

gives me

1338020418 33.514447422 9.142337666 16.479736 1338020431 33.514425964 9.142852650 16.960449 1338020431 33.514425964 9.142852650 16.960449 1338020446 33.514318676 9.143496380 16.960449 1338020446 33.514318676 9.143496380 16.960449 1338020446 33.514318676 9.143496380 16.960449 1338020459 33.514211388 9.144140110 16.479736 1338020479 33.514125557 9.145019875 14.557007 1338020479 33.514125557 9.145019875 14.557007 1338020484 33.514104099 9.145234451 14.557007 1338020484 33.514104099 9.145234451 14.557007

and yes...there are duplicates. that need to be eliminated. I added the following

my @unique = uniq @$points;

but then my data is gone, only empty fields are printed. That is a good and fast way to delete duplicates in data ???


In reply to What is the fastest way to delete duplicates from multi dimensional array ? by geogpx

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.