LogIn E-mail
설계이야기
사과장수이야기 
Study-HDL 
Script Tip 
Perl Tip 
C Memo 
Python Memo 
opendir , readdir , closedir
# 54 JMJS    24.6.22 12:16

opendir(THISDIR, ".");
@allfiles = readdir(THISDIR);
closedir(THISDIR);
print "@allfiles\n";

@allfiles = grep(!/^\.\.?$/, readdir(THISDIR));

@allfiles = grep(!/^\.\/, readdir(THISDIR));

@textlfiles = grep(-T, readdir(THISDIR));

opendir(DIR, $dirname) || die "opendir Error!\n"; #DIR은 디렉토리 핸들명, $dirname은 디렉토리명
@alldir = readdir DIR; #디렉토리에 존재하는 파일의 이름과 디렉토리의 이름을 배열에 저장한다.현재디릭토리와 상위 디렉토리도 포함
closedir(DIR);
게시물: 115 건, 현재: 1 / 1 쪽
번호 제       목 작성자 등록일 방문
115  perl format JMJS 24.6.22 373
114  perl -p -i -e s/abc/def/g JMJS 24.3.26 366
113  Deleting from a Hash , defined , exists JMJS 25.7.9 408
112  yaml file 읽기 JMJS 23.11.30 442
111  alzipcon JMJS 22.11.26 500
110  file2date.pl JMJS 24.6.1 615
109  UTF-8, EUC-KR JMJS 19.12.15 601
108  wget.pl LWP Simple get JMJS 19.9.17 620
107  X JMJS 19.9.17 592
106  X JMJS 19.9.17 599
105  X JMJS 19.9.17 605
104  X JMJS 19.9.17 604
103  X JMJS 19.9.17 601
102  X JMJS 19.9.17 581
101  gnome-terminal JMJS 25.7.3 602
100  jsame.pl JMJS 09.5.21 2134
99  jos.pl JMJS 08.11.29 1840
98  jmngr.pl - jmjspro manager JMJS 08.11.29 1884
97  vhdl.pm JMJS 08.11.29 1832
96  jreg.pl JMJS 08.11.29 1849
95  jtree.pm JMJS 08.11.29 1883
94  w2c.pl JMJS 08.11.29 1881
93  jdread.pl JMJS 08.11.29 1634
92  ffile.zip ffilediff.pl JMJS 09.4.24 1705
91  rgb2ycbcr.pl JMJS 10.5.12 2001
90  proview.pl JMJS 08.11.29 2067
89  smi_shift.pl JMJS 10.10.3 1689
88  srt2smi.pl srtshift.pl JMJS 18.7.14 1889
87  Perl CGI Input Test, getenv.cgi JMJS 18.11.21 1564
86  hash JMJS 24.6.22 1806
85  tr a-z A-Z 치환 , 대소문자 변환 , 문자열 조건 , ... JMJS 24.6.22 1578
84  JARRAY->jfunc JMJS 08.10.2 1601
83  수치함수 - ... JMJS 09.5.7 2081
82  역행렬3x3 JMJS 09.5.7 2152
81  hex2int.pl JMJS 10.9.12 2807
80  stat - file status 보기 JMJS 07.12.16 1707
79  Perl Tip JMJS 24.6.22 2835
78  SMI file sync delay JMJS 07.7.18 1778
77  rmword.pl JMJS 07.6.18 1723
76  pack unpack JMJS 24.6.22 1704
75  [Perl]read_dir.pl JMJS 07.2.22 1952
74  [Perl]jtab2char - tab문자를 특정 char로 바꿔주기 JMJS 07.2.22 1902
73  Perl 숫자 Sorting JMJS 11.5.17 1954
72  [CGI]GET and POST JMJS 06.11.20 3583
71  Perl Grammer JMJS 06.9.4 3178
70  표준 모듈 JMJS 06.8.10 2100
69  Getopt::Long example JMJS 06.8.10 2241
68  array of array JMJS 06.4.22 1711
67  [HTML]테이블 배경에 그림넣기 JMJS 06.3.8 1786
66  l2w.pm - line to word JMJS 08.12.1 1802
65  make_random_chars JMJS 05.8.10 1617
64  mail 보내는 script JMJS 05.3.23 1600
63  실행파일을 실행시키고 표준에러 읽기 JMJS 09.2.25 1627
62  팝업창(공지창)띄우기 Jinsung 03.12.16 2657
61  print <<ENDLINE JMJS 03.12.5 1700
60  [HTML]Target JMJS 03.5.21 1730
59  [Perl]jutil.pm JMJS 03.5.3 1936
58  [Perl]jdiff.pl JMJS 02.6.6 1897
57  [Perl]cfilter.pm - commant filter JMJS 02.1.31 1892
56  [HTML]자동으로 다른 페이지 이동 JMJS 02.1.19 1735
55  STDIN file open glob -w warning JMJS 24.6.22 1795
54  opendir , readdir , closedir JMJS 24.6.22 1785
53  rand_diff JMJS 01.10.23 1683
52  vcd2v.pl JMJS 15.8.25 1708
51  file upload JMJS 24.6.22 1679
50  umask(070) <- chmod o-rwx 진성 01.3.16 1855
49  head2index 진성 01.3.15 1572
48  grep.pl JMJS 11.1.20 1672
47  chr(13) = \M 진성 01.3.15 1533
46  stty JMJS 01.3.12 1655
45  des.pl JMJS 01.3.8 1603
44  chr_plus.pl JMJS 01.3.8 1621
43  get passwd in unix JMJS 19.8.18 1485
42  unsort JMJS 19.9.10 1765
41  read from website web JMJS 19.5.15 1509
40  vec JMJS 01.3.8 1784
39  chomp $_ @_ say defined use 5.010 state grep any ... JMJS 18.10.27 1654
38  [Perl Tk] 도스창 없이, 펄 Tk 스크립트 실행하기; ... JMJS 17.9.30 1650
37  @bs = sort {$a <=> $b} @as; JMJS 17.7.12 1719
36  if ( -e -z -s -f -d -T -B -M ) JMJS 16.3.10 1786
35  mkmm.pl - make freemind JMJS 12.5.22 1744
34  perl -pi.orig -e "s/\bu_(\w+_t)\b/u$1/g" *.c JMJS 11.8.26 1743
33  .xls output csv 파일에 \n "가 있을때 JMJS 11.4.13 1656
32  jdcat.pl juncat.pl JMJS 11.2.24 1792
31  print chr(ord('a')); JMJS 01.3.8 1701
30  require "/user/home/jin1/jin1.pm"; JMJS 00.11.28 1620
29  for(my $i=0; $i < @abc; $i ++) {} JMJS 00.11.15 1704
28  remove blank $abc =~ s/[\s]+//g; 정규표현식 ... JMJS 25.7.16 1630
27  array and for JMJS 00.11.14 1503
26  홈페이지 자동 이동 JMJS 00.10.28 1588
25  html에서 쓰이는 기호표시방법 JMJS 00.9.30 1482
24  배열의 범위 연산자 JMJS 00.9.20 1825
23  for(1..3) { print "$_";} JMJS 09.4.24 1521
22  package JMJS 24.6.22 1555
21  줄에서 한글자 고치기 JMJS 00.8.7 1625
20  hotkey function by getc JMJS 00.7.21 1671
19  read, sysread, syswrite JMJS 00.7.21 2572
18  crypt JMJS 00.7.13 1852
17  csv2gan.pl JMJS 11.4.4 1860
16  hexa JMJS 24.6.18 1664
15  file in out.pl JMJS 00.7.5 1843
14  ARGV JMJS 00.7.5 1687
13  jtime.pm - localtime, timelocal JMJS 09.4.9 2161
12  @INC JMJS 00.7.5 2044
11  $#myarray JMJS 00.7.5 1802
10  Hash of Array JMJS 00.7.5 1609
9  package JARRAY JHASH JMJS 00.7.4 1914
8  foreach, while each, dos2unix.pl, next last JMJS 09.4.24 1855
7  base64 enc dec binary JMJS 25.6.30 1643
6  file lock JMJS 00.7.4 1745
5  gettime JMJS 00.7.4 1808
4  [Perl]jcdread.pl JMJS 00.7.4 1823
3  [Perl]jdread.pl JMJS 00.7.4 1695
2  Monti Hall problem JMJS 24.6.27 1697
1  DESTROY JMJS 09.7.20 1670
[1]