2 # script that starts the zebraquee
3 # Written by TG on 01/08/2006
11 my $fileplace=C4
::Context
->config('intranetdir');
12 my $fullpath=$fileplace."/cgi-bin/sms";
14 my $pid=Win32
::Process
::Create
($ZebraObj, "C:/perl/bin/perl.exe",'perl sms_listen.pl', 0, DETACHED_PROCESS
,$fullpath) ;
16 print $input->redirect("/cgi-bin/koha/mainpage.pl?pid=$pid");