Select Code to Download

    # set charset to the safe ISO-8859-1
    $self->charset('ISO-8859-1');

  print $query->header( -type=>'text/html',
                        -charset=>'EUC-JP');

  $webapp->header_props(-type=>'text/html', -charset=>'EUC-JP');

  $query->charset('EUC-JP');

  $webapp->header_type('none');