matlab perl,Linux下Math-Matlab的安装和perl脚本调用MATLAB测试程序
不知道为何写这篇日志，或许以后也很少在linux下用到MATLAB，更不会用到这个perl和matlab的这些接口
，反正稀里糊涂的安装好了，就把过程简单的记录一下
CPAN上下载Math-Matlab的安装文件http://search.cpan.org/~zman/Math-Matlab-0.08/
Math-Matlab-0.08的INSTALL文件
第1步就说：Install a mod_perl enabled web server (http://perl.apache.org/).好吧，先安装mod_perl:
mod_perl安装：
下载mpd_perl 2.0 http://perl.apache.org/download/index.html
mod_perl-2.0.4文件夹中的INSTALL文件中的安装方法是：
% perl Makefile.PL MP_APXS=/usr/local/apache2/bin/apxs
% make && make test
% make install
可是，我的CentOS 5.4系统中，找不到apxs。如下解决：
[root@zhuliting matlab]# yum search apxs
Loaded plugins: fastestmirror
Loading mirror speeds from cached hostfile
* base: mirrors.163.com
* updates: mirrors.163.com
* addons: mirrors.163.com
* extras: mirrors.163.com
=========================================== Matched: apxs ============================================
httpd-devel.i386 : Development tools for the Apache HTTP server.
[root@zhuliting matlab]# yum install httpd-devel
...
...
[root@zhuliting matlab]# find / -name apxs
/usr/sbin/apxs
这个是apxs的路径，下面会用到。
[root@zhuliting mod_perl-2.0.4]# perl Makefile.PL MP_APXS=/usr/sbin/apxs
[root@zhuliting mod_perl-2.0.4]#/usr/sbin/apxs -q LIBEXECDIR
会显示modelus的路径：
/usr/lib/httpd/modules
追加httpd.conf:［这里可以不用追加了，修改httpd.conf，http服务将不能开启了！］
LoadModule perl_module /usr/lib/httpd/modules/mod_perl.so
最后
[root@zhuliting mod_perl-2.0.4]# make && make install
到这里，mod_perl安装完成，我们回到Math_Matlab-0.08的安装……
[root@zhuliting Math-Matlab-0.08]# perl Makefile.PL MP_APXS=/usr/sbin/apxs
Enter command to execute Matlab [ /usr/local/bin/matlab -nodisplay -nojvm ] :
这里不能直接敲回车，我用find 命令，发现MATLAB命令在/usr/local/Matlab/bin/matlab，所以，我手动输入：/usr/local/Matlab/bin/matlab -nodisplay -nojvm
回车后，提示信息如下：
Attempting to run Matlab ... which: no shopt in (/usr/lib/qt-3.3/bin:/usr/kerberos/sbin:/usr/kerberos/bin:/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin:/usr/X11R6/bin:/root/bin)
OK
Checking if your kit is complete...
Looks good
'MP_APXS' is not a known MakeMaker parameter name.
Writing Makefile for Math-Matlab
Most of the tests for the Server and Remote classes of the the
Math::Matlab package are not run by default.
In order to test them, you will need to set up a server according to the
instructions in the INSTALL file, then edit the 'server.config' file
with the appropriate values and re-run 'make test'.
执行Math-Matlab-0.08的INSTALL文件第2步
[root@zhuliting Math-Matlab-0.08]# make install
第3步到第5步，没怎么看明白，呵呵
如果你不是很明白要做什么，就什么也不要做了，目前为止，在本地电脑上Math-Matlab已经可以用 了。
写了个测试程序，居然成功了……就这样吧
附perl测试程序：
#!/usr/bin/perl
use Math::Matlab::Local;
$matlab = Math::Matlab::Local->new({
cmd => '/usr/local/Matlab/bin/matlab -nodisplay -nojvm',
root_mwd => '/etc/httpd/matlab-server'
});
#my $code = q/fprintf( 'Hello world!/n' );/;
my $code = q/disp(pinv([1 2;3 4;5 6;]));/;
if ( $matlab->execute($code) ) {
print $matlab->fetch_result;
} else {
print $matlab->err_msg;
}
另：
#$matlab->execute($code,"/etc/httpd/matlab-server","zlt.m") 可以执行指定目录下的m文件
如：
#!/usr/bin/perl
use Math::Matlab::Local;
$matlab = Math::Matlab::Local->new({
cmd => '/usr/local/Matlab2009a/bin/matlab -nodisplay -nojvm',
root_mwd => '/etc/httpd/matlab-server'
});
my $code='';
if ( $matlab->execute($code,"/etc/httpd/matlab-server","zlt.m") ) {
print $matlab->fetch_result;
} else {
print $matlab->err_msg;
}