과거 비주얼베이직만큼 만들기가 용이하면서도, 더 강력하고, 심지어는 크로스플램폼도 지원한다면?
내가 CTO라면 당장 회사의 표준언어로 perl을 채택할것이다.ㅋㅋ
Wx 프로그램을 perl로 만들고자 한다면, 딸기펄(Strawberry-perl) 을 추천한다.
MingW 가 내장되어있어 속시원하게 cpan모듈들을 즉석에서 무료로!! 컴파일 하여 쓸수 있게 해준다.
Wx 모듈을 딸기펄의 cpan으로 설치하면, 특히나 속시원하게 죽죽 빌드하고, 테스트창까지 띄우는 SHOW를 즐길수 있을 것이다. 와우!! 매우 뿌듯함이 몰려오는 그 시간...ㅋㅋ
혹시나 해서 설치방법.. 아래 작업만 하면 Wx는 모두 준비된다.
c:\> cpan
cpan> install Wx
그리고 PAR과 나머지 필수 모듈을 설치한다.
cpan> install PAR
cpan> install PAR::Packer
cpan> install Wx::Perl::Packer
이제 도스창에서는 pp 를 치면 perl코드를 exe로 만들어주는 명령이 실행된다.
C:\> pp
C:\strawberry\perl\bin/pp: No input files specified
오...바로 해보자. 아래 내용을 wxtest.pl 로 저장하고 perl wxtest.pl 로 실행해보자.
use Wx;후진창이 하나 뜰것이다. 후져보여도 크로스플랫폼이어서 당당할수 있다.
package MyApp;
use base 'Wx::App';
sub OnInit {
my $frame = Wx::Frame->new( undef,
-1,
'wxPerl rules',
[-1, -1],
[250, 150],
);
$frame->Show( 1 );
}
package main;
my $app = MyApp->new;
$app->MainLoop;
이제 exe로 만들자.
pp -out a.exe a.pl디렉토리를 보면 a.exe가 만들어졌다!! 4메가 약간 넘는 것이..그러나 크로스플랫폼 지원을 생각하면 아무것도 아니다!!
그러나 실행해보면 에러가 날것이다!! wxbase뭐시기 길기도 긴 dll 파일이 없다고 한다. 헉 이게 뭔지 알고 또 어디에 둬야하나? Wx 만 아니면 거의 다 잘되는데 아흐 답답해지기 시작한다.
걱정마시라 그래서 아까 설치한 Wx::Perl::Packager에 포함된 wxpar 이 있다.
wxpar --gui -o a.exe a.pl제대로 알기만 한다면 pp 명령에도 추가해줄 파일들을 명시하면 되는 일이지만,
wxpar 을 사용하면 Wx 의존파일들을 알아서 추가해준다.
덤으로 gdiplus 디렉토리를 만들어서 gdiplus.dll 파일도 필요할 경우 넣을 곳을 마련해준다.
이제 실행하면 된다!! Enjoy Perl!!







