Hi guys really hoping someone can advise me with this. I have a Perl script that connect to a PostgreSQL database and retrieves fields and rows from a database of bus timetables and bus stop information. The data I am extracting is the reference number of the bus stop, the route number this bus stop serves and the distance of a point to this bus stop. The select query returns rows like this in PostgreSQL: 
stop_reference | service_id | distance
----------------+------------+------------------
6200200581 | 1 | 131
6200249240 | 2 | 148.32734070292
6200249230 | 2 | 247.695377429616
6200249250 | 2 | 394.507287638644
6200249220 | 2 | 394.81641303269

[download]
Now what I want to be able to do is to loop through each of the rows from this query in Perl, and to find where the service_id is the same. And make an IF statement that says when they are the same only return the row with the shortest distance. This is the part of the Perl script that brings my query into Perl: 
$originsql = qq{ SELECT a.stop_reference, b.service_id, distance....};
$sth = $dbh->prepare( $originsql );
$sth->execute();
$sth->bind_columns( undef, \$stops, \$service, \$distance );
while( $sth->fetch() )
{

[download]
Im hoping someone can help me to do this? If you need anymore information please let me know. Thanks

In reply to Help with manipulating data from a database?? by Harch84

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.