놀자코딩

설치 # yum install postgresql84 postgresql84-devel postgresql84-libs postgresql84-contrib postgresql84-server DB 초기화 # service postgresql initdb /var/lib/pgsql/data 에 초기화된 파일들이 생성된다. 설정파일 위치 :  /var/lib/pgsql/data 시스템 부팅시 자동으로 실행되게 하려면,  ntsysv  에서 postgresql 을 체크해주어야 한다. 사용자, DB 생성 # su - postgres # psql postgres=# CREATE USER 아이디 WITH PASSWORD '비밀번호'; postgres=# CREATE DATABASE 디비이름 WITH ENCODING='utf-8' OWNER 아이디; 계정으로 로그인할 수 있도록 연결설정 # su - # cd /var/lib/pgsql/data/ # vi pg_hba.conf 모두 주석으로 막고 아래만 남김 host all all 0.0.0.0 0.0.0.0 password local all postgres trust local all all password # vi postgresql.conf listen_addresses = '*' # /etc/init.d/postgresql restart # psql -d 디비이름 -U 아이디 -W

최근 가상서버를 이용한 서비스를 알아보니, OS를 내가 원하는 것으로 마음대로 설치할 수 없고, 제공되는 OS만 설치가 가능하였다. 나의 주력 OS는 Debian Linux 인데, 지원되는 곳이 없다. 그나마 카페24에서 우분투를 지원하고 있기는 하다. 업체에서 공통적으로 지원되는 OS는 Redhat Enterprise Linux의 클론인 CentOS 5.x 이다. 아무래도 래드햇이 업계에서 많이 쓰이고 있기 때문일 것이다. 마음에는 안들지만, CentOS를 효과적으로 쓰도록 노력하는 것이 현실적일 것이다. 그 첫 번째 단계인 설치부터 시작한다. *^^* 캡쳐화면이 없긴 하지만, 꽤 도움이 될 것이다. CentOS 5.x 설치 http://centos.org 를 통해서  CentOS-5.5-i386-netinstall.iso  파일을 다운로드 받는다. 약 10MB 정도밖에 안되서 순식간에 받을 것이다. 이것을 CD로 구워서, 설치할 것이며, 전부 인터넷을 통해서 다운로드 받아서 설치하게 될 것이다. 굳이 CD를 여러장 구울필요 없다는 뜻이다. 패키지가 있는 Repository 를 설정해야 하는데, 2011-03-29 현재, 국내에는 6개의 사이트가 존재한다. 아래 WebSite와 Directory 를 눈여겨봐두자. 조금있다가 설치를 진행하면서 이것을 입력할 것이기 때문이다. WebSite Directory http://data.nicehosting.co.kr /os/CentOS/5.5/os/i386 http://centos.mirror.cdnetworks.com /5.5/os/i386 http://ftp.daum.net /centos/5.5/os/i386 http://mirror.khlug.org /centos/5.5/os/i386 http://centos.tt.co.kr /5.5/os/i386 http://mirror.yongbok.net /centos/5.5/os/i386 Start Page 이제, 구운 CD 를 드라이브에...

요즘 Perl 짓을 조금 하고 있는 중이다. 어쩌다 보니, MS-SQL도 사용하게 되었는데, 여러가지 방법이 있었지만, FreeTDS를 이용하는 것이 가장 간편한 것 같아서 정리해보았다. (Debian) Linux 에서 MS-SQL 연결하기 Install FreeTDS # apt-get install freetds-* Install Sybase module # apt-get install libdbd-sybase-perl /etc/freetds/freetds.conf 수정 ... [Our-MS-SQL] host = 아이피주소 port = 1433 tds version = 7.0 ... 예제 코드 #!/usr/bin/env perl   use DBI;   my ( $dbh , $sth , $sql ) ; $dbh = DBI -> connect ( "DBI:Sybase:server=Our-MS-SQL; database=디비이름" , "아이디" , "비밀번호" ) || die $DBI :: errstr ;   $sql = " insert users ( id, name, mobile ) values (1, 'My Name', '010-2654-5555') " ; $sth = $dbh -> prepare ( $sql ) ; $sth -> execute ( ) ;   $sth -> finish ( ) ; $dbh -> disconnect ( ) ;

윈도우 파일서버에서 100MB 가 넘는 파일을 찾기 위해서 디렉토리를 순회하는 방법을 찾아보았다. 보통은 File-Find 를 많이 쓰지만, 1TB이상 사용하고 있는 드라이브에서는 검색 도중에 Out of memory 메시지와 함께 멈추는 현상이 있었고, 대신 File-Find-Object 로 해보니, 아주 깔끔하게 검색이 되었다. 디렉토리 순회하기 File-Find 일반적으로 많이 알려진 방법인데, 1TB 용량의 드라이브 검색시 죽는 현상을 발견하였다. # 100MB 넘는 파일 목록 출력   use strict ; use warnings ; use File :: Find ;   my $limited_size = 100 _000_000 ; # 100MB find ( \&process_file , ( "P:/" ) ) ;   sub process_file { my $file = $File :: Find :: name ; return unless - e $file ; return unless - f $file ; return unless - r $file ; return unless - R $file ; return if - s $file < $limited_size ;   print "$file \n " ; } File-Find-Object File-Find 를 객체지향적으로 재구성한 모듈으로, 대량의 디렉토리,파일에도 잘 동작한다. 별도로 모듈을 설치해야하는 번거로움이 있긴하다. C:\> ppm install File-Find-Object 예제 코드는 다음과 같다. # 100MB 넘는 파일 목록 출력   use strict ; use warnings ; use File :: Find :: Object ;   my $limited_size =...