Select Code to Download

#!perl -slw
use strict;
...
my %host= ( foo=>100, bar=>200,, baz=>300 );

cgiOut %host;