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 491
114  perl -p -i -e s/abc/def/g JMJS 24.3.26 420
113  Deleting from a Hash , defined , exists JMJS 25.7.9 499
112  yaml file 읽기 JMJS 23.11.30 542
111  alzipcon JMJS 22.11.26 593
110  file2date.pl JMJS 24.6.1 696
109  UTF-8, EUC-KR JMJS 19.12.15 715
108  wget.pl LWP Simple get JMJS 19.9.17 721
107  X JMJS 19.9.17 689
106  X JMJS 19.9.17 705
105  X JMJS 19.9.17 712
104  X JMJS 19.9.17 703
103  X JMJS 19.9.17 702
102  X JMJS 19.9.17 678
101  gnome-terminal JMJS 25.7.3 701
100  jsame.pl JMJS 09.5.21 2272
99  jos.pl JMJS 08.11.29 1939
98  jmngr.pl - jmjspro manager JMJS 08.11.29 1993
97  vhdl.pm JMJS 08.11.29 1883
96  jreg.pl JMJS 08.11.29 1938
95  jtree.pm JMJS 08.11.29 1929
94  w2c.pl JMJS 08.11.29 1988
93  jdread.pl JMJS 08.11.29 1729
92  ffile.zip ffilediff.pl JMJS 09.4.24 1783
91  rgb2ycbcr.pl JMJS 10.5.12 2078
90  proview.pl JMJS 08.11.29 2133
89  smi_shift.pl JMJS 10.10.3 1786
88  srt2smi.pl srtshift.pl JMJS 18.7.14 1989
87  Perl CGI Input Test, getenv.cgi JMJS 18.11.21 1634
86  hash JMJS 24.6.22 1921
85  tr a-z A-Z 치환 , 대소문자 변환 , 문자열 조건 , ... JMJS 24.6.22 1618
84  JARRAY->jfunc JMJS 08.10.2 1688
83  수치함수 - ... JMJS 09.5.7 2158
82  역행렬3x3 JMJS 09.5.7 2310
81  hex2int.pl JMJS 10.9.12 2847
80  stat - file status 보기 JMJS 07.12.16 1821
79  Perl Tip JMJS 24.6.22 2880
78  SMI file sync delay JMJS 07.7.18 1876
77  rmword.pl JMJS 07.6.18 1818
76  pack unpack JMJS 24.6.22 1855
75  [Perl]read_dir.pl JMJS 07.2.22 2111
74  [Perl]jtab2char - tab문자를 특정 char로 바꿔주기 JMJS 07.2.22 2013
73  Perl 숫자 Sorting JMJS 11.5.17 2047
72  [CGI]GET and POST JMJS 06.11.20 3641
71  Perl Grammer JMJS 06.9.4 3232
70  표준 모듈 JMJS 06.8.10 2197
69  Getopt::Long example JMJS 06.8.10 2283
68  array of array JMJS 06.4.22 1802
67  [HTML]테이블 배경에 그림넣기 JMJS 06.3.8 1892
66  l2w.pm - line to word JMJS 08.12.1 1903
65  make_random_chars JMJS 05.8.10 1707
64  mail 보내는 script JMJS 05.3.23 1704
63  실행파일을 실행시키고 표준에러 읽기 JMJS 09.2.25 1726
62  팝업창(공지창)띄우기 Jinsung 03.12.16 2730
61  print <<ENDLINE JMJS 03.12.5 1771
60  [HTML]Target JMJS 03.5.21 1843
59  [Perl]jutil.pm JMJS 03.5.3 1986
58  [Perl]jdiff.pl JMJS 02.6.6 1995
57  [Perl]cfilter.pm - commant filter JMJS 02.1.31 1984
56  [HTML]자동으로 다른 페이지 이동 JMJS 02.1.19 1832
55  STDIN file open glob -w warning JMJS 24.6.22 1891
54  opendir , readdir , closedir JMJS 24.6.22 1859
53  rand_diff JMJS 01.10.23 1790
52  vcd2v.pl JMJS 15.8.25 1747
51  file upload JMJS 24.6.22 1783
50  umask(070) <- chmod o-rwx 진성 01.3.16 1965
49  head2index 진성 01.3.15 1648
48  grep.pl JMJS 11.1.20 1779
47  chr(13) = \M 진성 01.3.15 1626
46  stty JMJS 01.3.12 1740
45  des.pl JMJS 01.3.8 1638
44  chr_plus.pl JMJS 01.3.8 1693
43  get passwd in unix JMJS 19.8.18 1603
42  unsort JMJS 19.9.10 1927
41  read from website web JMJS 19.5.15 1577
40  vec JMJS 01.3.8 1887
39  chomp $_ @_ say defined use 5.010 state grep any ... JMJS 18.10.27 1715
38  [Perl Tk] 도스창 없이, 펄 Tk 스크립트 실행하기; ... JMJS 17.9.30 1756
37  @bs = sort {$a <=> $b} @as; JMJS 17.7.12 1820
36  if ( -e -z -s -f -d -T -B -M ) JMJS 16.3.10 1856
35  mkmm.pl - make freemind JMJS 12.5.22 1828
34  perl -pi.orig -e "s/\bu_(\w+_t)\b/u$1/g" *.c JMJS 11.8.26 1835
33  .xls output csv 파일에 \n "가 있을때 JMJS 11.4.13 1753
32  jdcat.pl juncat.pl JMJS 11.2.24 1891
31  print chr(ord('a')); JMJS 01.3.8 1794
30  require "/user/home/jin1/jin1.pm"; JMJS 00.11.28 1720
29  for(my $i=0; $i < @abc; $i ++) {} JMJS 00.11.15 1742
28  remove blank $abc =~ s/[\s]+//g; 정규표현식 ... JMJS 25.7.16 1709
27  array and for JMJS 00.11.14 1580
26  홈페이지 자동 이동 JMJS 00.10.28 1683
25  html에서 쓰이는 기호표시방법 JMJS 00.9.30 1519
24  배열의 범위 연산자 JMJS 00.9.20 1926
23  for(1..3) { print "$_";} JMJS 09.4.24 1576
22  package JMJS 24.6.22 1644
21  줄에서 한글자 고치기 JMJS 00.8.7 1692
20  hotkey function by getc JMJS 00.7.21 1715
19  read, sysread, syswrite JMJS 00.7.21 2668
18  crypt JMJS 00.7.13 1953
17  csv2gan.pl JMJS 11.4.4 1946
16  hexa JMJS 24.6.18 1742
15  file in out.pl JMJS 00.7.5 1911
14  ARGV JMJS 00.7.5 1798
13  jtime.pm - localtime, timelocal JMJS 09.4.9 2199
12  @INC JMJS 00.7.5 2166
11  $#myarray JMJS 00.7.5 1915
10  Hash of Array JMJS 00.7.5 1694
9  package JARRAY JHASH JMJS 00.7.4 2072
8  foreach, while each, dos2unix.pl, next last JMJS 09.4.24 1941
7  base64 enc dec binary JMJS 25.6.30 1749
6  file lock JMJS 00.7.4 1845
5  gettime JMJS 00.7.4 1983
4  [Perl]jcdread.pl JMJS 00.7.4 1925
3  [Perl]jdread.pl JMJS 00.7.4 1796
2  Monti Hall problem JMJS 24.6.27 1782
1  DESTROY JMJS 09.7.20 1782
[1]