my %options = ( show_reqs => sub { my $report = shift; return checkbox( -name => $report . '_show_reqids', -checked => 0, -value => 'ON', -label => 'Show requirement IDs?'), } ); print $options{$option}->($report), "\n";