sub cols {
    my ($self, $which, @list) = @_;
    no strict 'refs';
    if (@list) {
        @{$$self{"_cols_$which"}} = @list;
    } else {
        return @{$$self{"_cols_$which"}}
    }
}

##</code><code>##

file error - parse error - stuff/list.tpl line 17: unexpected token (Blah) [% use Blah %]<br>