태그를 입력해 주세요.4 (Perl) 폴더 사이즈 구하기 Perl에서 더 좋은 모듈을 발견하지는 못해서, 일일이 파일 사이즈를 모두 더해서 폴더 사이즈를 구하였다. 그래서 시간이 좀 걸린다. 첫번째 방법use v5.10;use strict;use warnings;use File::Find;sub get_folder_size { my ($dst_folder) = @_; my $folder_size = 0; find( sub { $folder_size += -f $_ ? -s _ : 0 }, $dst_folder ); return $folder_size;}say "Folder Size : ".get_folder_size("C:\\");두번째 방법# -----------------------------------------------------.. Programming/Perl 2014. 5. 3. NetBSD 커널 컴파일하기 NetBSD 의 커널을 컴파일하는 방법을 정리해보았다. 같은 BSD 계열이라서 FreeBSD 와도 많이 비슷한 면이 있다. 커널 설정 파일 생성하기 # cd /usr/src/sys/arch/i386/conf/ # cp GENERIC MYKERNEL 커널 수동 빌드 # config MYKERNEL # cd ../compile/MYKERNEL # make depend # make build.sh 를 사용하여 커널 빌드하기 # cd /usr; mkdir obj; chown root:wsrc obj # cd /usr/src # ./build.sh tools # ./build.sh kernel=MYKERNEL 새로운 커널 설치하기 # mv /netbsd /netbsd.old # cd /usr/src/sys/arc.. ETC (IT) 2013. 3. 4. (Groovy) 여러 디렉토리의 사이즈를 구하고 크기 순으로 정렬하기 Ruby 버전에 이어서 Groovy 버전도 만들어보았다. 거의 생김새가 비슷한 언어여서, 몇가지만 수정하면 바로 동작한다.def FOLDER_LIST = [ "/path/to1", "/path/to2", "/path/to3", "/path/to4", "/path/to5", ]def startDate = new Date().format('yyyy/MM/dd HH:mm:ss')def size_folder_list = []FOLDER_LIST.each { folder_name -> def folder_siz.. Programming/Groovy 2012. 6. 15. (Ruby) 특정 디렉토리 밑에 있는 파일중에 200MB 넘는 파일 찾기 다음은 특정 디렉토리 아래에 있는 파일 중에서 200MB 넘는 파일을 찾아서, 크기로 정렬하여 출력하는 프로그램이다. 어려운 것은 아니지만, 필요할 때 찾아보면 좋을 듯 하여~ ^^# -*- coding: cp949 -*-require 'find'$TARGET = "C:\\"$SIZE_LIMIT = 200_000_000start_time = Time.nowputs "Script Start..."puts "=========================================================================\n\n"file_list = Array.newFind.find($TARGET) do |path| if File.file?(path) and File.size(pat.. Programming/Ruby 2012. 5. 25. 이전 1 다음