Perl使用chdir的實(shí)例代碼
更新時(shí)間：2013年02月05日 13:58:37 作者：
Perl使用chdir的例子，供朋友們參考學(xué)習(xí)
復(fù)制代碼 代碼如下:
use strict;
use warnings;
# Print all files in a directory
sub print_files {
my $dir = 'd:/code';
opendir DIR, $dir or die $!;
my @files = readdir DIR;
chdir $dir; # Use chdir or -f will not work, since -f need absolutely path
foreach my $file (@files) {
if (-f $file) {
print "$file\n";
}
}
closedir DIR;
}
&print_files();
相關(guān)文章
perl的INC變量包含了所有perl module的查找路徑，可以使用perl -V 來(lái)查看INC的值2013-02-02
using Net::SSH2 shell 的二個(gè)方法
using Net::SSH2 shell 的二個(gè)方法，供大家參考2013-02-02
這篇文章主要介紹了Perl中的子程序?qū)W習(xí)筆記,本文講解了子程序的定義、調(diào)用、返回值、局部變量、子程序參數(shù)傳遞等內(nèi)容,需要的朋友可以參考下2015-02-02
perl數(shù)據(jù)庫(kù)添加、刪除、更新、查詢操作例子
這篇文章主要介紹了perl數(shù)據(jù)庫(kù)添加、刪除、更新、查詢操作例子,本文直接給出操作代碼,需要的朋友可以參考下2014-08-08
Perl腳本實(shí)現(xiàn)檢測(cè)主機(jī)心跳信號(hào)功能
這篇文章主要介紹了Perl腳本實(shí)現(xiàn)檢測(cè)主機(jī)心跳信號(hào)功能,本文代碼也可作為perl串口通信的實(shí)例,需要的朋友可以參考下2014-10-10
以下的程序，輸出一串?dāng)?shù)字中比平均值大的數(shù)，其中有兩個(gè)問(wèn)題值得注意，具體請(qǐng)看程序中的注釋2013-02-02
這篇文章主要介紹了在Django框架中自定義模板過(guò)濾器的方法,Django是重多人氣Python框架中最為著名的一個(gè),需要的朋友可以參考下2015-07-07
這篇文章主要介紹了Perl中的單行注釋和多行注釋語(yǔ)法,本文還同時(shí)講解了其它常見(jiàn)編程語(yǔ)言的單行注釋和多行注釋語(yǔ)法,需要的朋友可以參考下2015-06-06
這篇文章主要介紹了Perl List::Util模塊使用實(shí)例,本文給出掃描符合條件的某個(gè)列表并取出第一個(gè)符合條件的、求1到1000之間的和 、求一組數(shù)字的最大值與最小值等實(shí)用功能代碼,需要的朋友可以參考下2015-06-06
Windows和Linux系統(tǒng)下perl連接SQL Server數(shù)據(jù)庫(kù)的方法
這篇文章主要介紹了Windows和Linux系統(tǒng)下perl連接SQL Server數(shù)據(jù)庫(kù)的方法,本文詳細(xì)的講解了Windows和Linux系統(tǒng)中perl如何連接Microsoft SQL Server數(shù)據(jù)庫(kù),需要的朋友可以參考下2014-10-10