#!/usr/bin/perl -Tw
-# $Id: sets.cgi,v 1.6 1999-04-23 06:34:07 ivan Exp $
+# $Id: sets.cgi,v 1.7 1999-07-18 05:08:29 ivan Exp $
# Copyright (c) 1999 Ivan Kohler. All rights reserved.
# This program is free software; you can redistribute it and/or modify it under
# the same terms as perl itself
print $cgi->start_table,
$cgi->tr(
- ( map {
- $cgi->th($_)
- } @columns
- ), $cgi->th('People');
+ ( map { $cgi->th($_) } @columns ),
+ $cgi->th('People')
)
;