for (my $i = 0; $i < $column_count; $i++) {
my $prop = $props_to_print->[$i];
- my $propinfo = $returnprops->{$prop};
- die "undefined property '$prop'" if !$propinfo;
+ my $propinfo = $returnprops->{$prop} // {};
my $title = $propinfo->{title} // $prop;
my $cutoff = $propinfo->{print_width} // $propinfo->{maxLength};
printf $formatstring, map { $colopts->{$_}->{title} } @$props_to_print;
if (defined($sort_key)) {
- my $type = $returnprops->{$sort_key}->{type};
+ my $type = $returnprops->{$sort_key}->{type} // 'string';
if ($type eq 'integer' || $type eq 'number') {
@$data = sort { $a->{$sort_key} <=> $b->{$sort_key} } @$data;
} else {