国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 編程 > Perl > 正文

perl膠水實(shí)現(xiàn)前后臺(tái)對(duì)接的方法

2020-02-23 19:44:59
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友

現(xiàn)在已經(jīng)很少人學(xué)習(xí)Perl了,我們?cè)陂_發(fā)項(xiàng)目的時(shí)候突然會(huì)遇到一些問(wèn)題,想在網(wǎng)上查閱,才發(fā)現(xiàn)都是幾年前的內(nèi)容了,今天武林技術(shù)頻道為大家更新perl膠水實(shí)現(xiàn)前后臺(tái)對(duì)接的方法,一起來(lái)了解一下吧!

1. Perl“膠水”,能夠?qū)⒏鞣N應(yīng)用程序或者各種語(yǔ)言的代碼結(jié)合起來(lái)。
Perl可以編寫普通的腳本程序,還可以使用cgi模塊編寫Web應(yīng)用程序,同時(shí)可以使用DBI訪問(wèn)各種數(shù)據(jù)庫(kù)。
除此之外,Perl可以將各種層次的應(yīng)用程序粘在一起,發(fā)揮更強(qiáng)大的功能。

2.
前臺(tái)是一個(gè)網(wǎng)站W(wǎng)eb應(yīng)用程序,底層或者是后臺(tái)是用C,C++或者Java編寫,使用Perl可以將兩者對(duì)接起來(lái),實(shí)現(xiàn)更強(qiáng)大的功能,發(fā)揮各自的優(yōu)勢(shì)。
Perl實(shí)現(xiàn)該方法的途徑有兩個(gè):
1) 直接在Perl腳本中嵌入別的語(yǔ)言編寫的代碼,這個(gè)可以使用Perl相關(guān)的模塊,比較簡(jiǎn)單的是Inline,更能稍強(qiáng)但稍微復(fù)雜的是XS等。
2)另一種,是使用Perl的系統(tǒng)調(diào)用函數(shù)system:
如:
windows下

?

use strict;
my $file="test.txt";
system("edit $file");
#調(diào)用dos的edit工具
system("dir");

?

等。

另一種寫法:
qx{dir};
捕獲返回的結(jié)果,可以將結(jié)果賦予標(biāo)量或者一個(gè)列表數(shù)組,標(biāo)量的話獲取結(jié)果字符的最后一樣;數(shù)組的話,每個(gè)元素對(duì)應(yīng)結(jié)果的每一行。
如:

?

?

use strict;
my @result=qx{dir};
my $eachline;
foreach $eachline (@result)
{
??? print "$eachline? ";
}

?

還可以自己編寫exe,然后由perl的system函數(shù)(或者qx)來(lái)調(diào)用。
如,可以編寫一個(gè),可給輸入?yún)?shù)的exe程序:
main.c

?

#include <stdio.h>
#include <stdlib.h>
int main(int argc, char **argv)
//int main(int argc, char *argv[])
{
??? int i;
??? for(i=0; i<argc; i++)
??? {
??????????? printf("%d arg is %s? ",i,argv[i]);
??? }
??? return 0;
}
//該程序的主要功能是打印出傳遞給main函數(shù)的各個(gè)參數(shù)。


例子:

?

?

?


#!/usr/bin/perl
use strict;
my @result=qx{main.exe hello iam here};
my $eachline;
foreach $eachline (@result)
{
??? print "$eachline ";
}

看了上面的介紹,想必大家已經(jīng)知道了perl膠水實(shí)現(xiàn)前后臺(tái)對(duì)接的方法,我們程序員在家中開發(fā)的時(shí)候,可以參照本文進(jìn)行操作。

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表

圖片精選

主站蜘蛛池模板: 寻甸| 新闻| 新巴尔虎左旗| 朝阳区| 平凉市| 乌兰察布市| 新兴县| 宜宾市| 濮阳县| 江城| 石景山区| 南城县| 星子县| 桃江县| 长沙市| 商南县| 陆良县| 珠海市| 凌海市| 白水县| 金沙县| 六盘水市| 明溪县| 木兰县| 革吉县| 胶南市| 禹州市| 西华县| 泾川县| 孟连| 嘉义市| 辽阳县| 内丘县| 江阴市| 玉溪市| 留坝县| 灌南县| 揭阳市| 广汉市| 隆林| 兖州市|