Select Code to Download

#!/usr/bin/perl

use CGI;
...
print $q->header,
  $q->start_html,
  $q->h2("$cf,$ct");