perl逐行讀取文件 perl如何調(diào)用其他的perl文件?
perl如何調(diào)用其他的perl文件?可以使用兩種方法:1。需要“xxx.pl公司“2.使用下午xxx在Perl中添加require或use相當(dāng)于添加一個(gè)文件xxx.pl/下午整個(gè)文件將添加到調(diào)用它的文
perl如何調(diào)用其他的perl文件?
可以使用兩種方法:
1。需要“xxx.pl公司“
2.使用下午xxx在Perl中添加require或use相當(dāng)于添加一個(gè)文件xxx.pl/下午整個(gè)文件將添加到調(diào)用它的文件中;例如:gettime.pl#!/usr/bin/perlprint“獲取時(shí)間是2011-07-25 14:40:10n”演出時(shí)間.pl#!/usr/bin/perlrequire“獲取時(shí)間.pl執(zhí)行“print”get time OKn顯示時(shí)間.pl它將顯示:gettime是2011-07-25 14:40:10 get time OK
您可以有兩個(gè)方案。1) 使用DOS本身的Perl函數(shù)你的腳本.pl&燃?xì)廨啓C(jī)C:結(jié)果.txt2)在Perl中打開f,“>C:/結(jié)果.txt“或死”$!無法準(zhǔn)備文件!“opendir D”D:/read“or die”$!無法讀取目錄!“print F”$u$/“while(readdir d),或者按照您最初編寫的方式編寫。關(guān)閉目錄dclose f