Something like this:
sub {
my $field = shift;
my $length=shift;
return substr($field, 0, $length) . '...';
}
sub {
my $field = shift;
my $length=shift;
return substr($field, 0, $length) . '...';
}
Subject | Author | Views | Date |
---|---|---|---|
![]() |
kzap | 2362 | Sep 9, 2003, 11:21 AM |
![]() |
afinlr | 2320 | Sep 9, 2003, 4:23 PM |
![]() |
kzap | 2326 | Sep 9, 2003, 9:33 PM |
![]() |
Andy | 2319 | Sep 10, 2003, 12:39 AM |
![]() |
kzap | 2302 | Sep 11, 2003, 11:18 AM |
![]() |
Andy | 2307 | Sep 11, 2003, 11:22 AM |
![]() |
afinlr | 2292 | Sep 11, 2003, 3:23 PM |