Perl CGI

• Header 안에 charset 정보를 넣어준다.

print $q->header(-charset => 'utf-8');

• Perl CGI에서 Oracle 환경설정을 해주지 않으면 한글이 제대로 나오지 않을 수 있다.

  #!/usr/bin/perl -w
  #
  # starlits@adminschool.net
  # Thu May 31 17:39:00 KST 2007
  #
  
  #use CGI;
  use CGI(-nosticky);
  
  $ENV{"ORACLE_HOME"} = "/home/oracle/product/10gR2";
  $ENV{"NLS_LANG"} = "AMERICAN_AMERICA.KO16MSWIN949";
  $ENV{"LD_LIBRARY_PATH"} = "$ORACLE_HOME/lib:$ORACLE_HOME/jdbc/lib";
  $ENV{"CLASSPATH"} = "$ORACLE_HOME/DB_1/lib/classgen.jar:$ORACLE_HOME/jdbc/lib";