婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > Perl使用chdir的實例代碼

Perl使用chdir的實例代碼

熱門標簽:買了外呼系統(tǒng)不想用了怎么辦 開封百應電銷機器人聯(lián)系方式 武漢呼叫中心外呼系統(tǒng)線路商 樂昌電話機器人 電話機器人電話卡封號怎么辦 真人語音電銷機器人系統(tǒng) 邯鄲外呼調(diào)研線路 浦東上海400開頭的電話申請 北京語音電銷機器人價格

復制代碼 代碼如下:

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();

標簽:松原 石嘴山 河北 鄂州 自貢 宜春 淄博 六安

巨人網(wǎng)絡通訊聲明:本文標題《Perl使用chdir的實例代碼》,本文關鍵詞  Perl,使用,chdir,的,實例,代碼,;如發(fā)現(xiàn)本文內(nèi)容存在版權問題,煩請?zhí)峁┫嚓P信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《Perl使用chdir的實例代碼》相關的同類信息!
  • 本頁收集關于Perl使用chdir的實例代碼的相關信息資訊供網(wǎng)民參考!
  • 推薦文章
    主站蜘蛛池模板: 香河县| 英德市| 怀安县| 尖扎县| 肥城市| 汉沽区| 乐安县| 斗六市| 磐安县| 嘉荫县| 青铜峡市| 民乐县| 若羌县| 封丘县| 深州市| 麻栗坡县| 绥阳县| 普陀区| 东源县| 阿尔山市| 新乡县| 固原市| 阳曲县| 海兴县| 抚顺市| 平阳县| 临江市| 密云县| 建水县| 奉贤区| 徐汇区| 儋州市| 泰来县| 宽城| 罗源县| 大理市| 龙门县| 靖远县| 盐津县| 泗阳县| 同心县|