package Output_Strategy::HTML;
package Output_Strategy::CSV;
. . .
my $output_strategy = $opt{'html'}
? 'Output_Strategy::HTML'
: 'Output_Strategy::CSV';
$output_strategy->preamble;
$output_strategy->render(@data);
$output_strategy->postamble;
# whatever