Select Code to Download

use strict;
use warnings;
...
        ? $form->confirm
        : $form->render;
}

$ perl cfb.pl
Content-Type: text/html; charset=ISO-8859-1
...
</table>
</div>
</form>