Select Code to Download

<TABLE class="items">
% foreach my $item (@items) {
<TR><TD><% $item->link( %ARGS ) %></TD></TR>
% }
</TABLE>

sub link {
  my $self = shift;
...

  return '<A href="/path/to/item.html?id='.$self->id.'&foo='.$args{'fo
+o'}.'&bar='.$args{'bar'}.'>'.$self->name.'</A>';
}