Re: Resort Table


Keep It Simple, Stupid
	PerlMonks

Re: Resort Table

by tcf22 (Priest)

on Oct 27, 2003 at 19:54 UTC ( [id://302498]=note: print w/replies, xml )

Need Help??

in reply to Resort Table

I think this may be what you are looking for:

my $sort_order = $q->param('sort_order');
my $order      = $q->param('order');
print '<tr>';
foreach(@column_headings){
    print "<td><A href=\"pastRequests.pl?order=$_&sort_order=" . 
          (($_ eq $order && $sort_order eq 'desc') ? 'asc' : 'desc') .
          "\">$_</a></td>";
}
print '</tr>';

my @records = ##Get your data, maybe an array of hashes??
@records = reverse(@records) if($sort_order eq 'asc');
foreach(@records){
  ##Output records
}
[download]

- Tom