mwultong Blog ... 프로그래밍 / 계산기

컴퓨터 엑셀 워드 포토샵 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Friday, November 17, 2006

Perl/펄] 파일 사이즈 구하기, 파일 크기 바이트 단위로 얻기; Get File Size


펄에서는 -s 라는 연산자(함수 아님)로 파일의 사이즈를 바이트 단위로 간단히 구할 수 있습니다.

-s 뒤에 파일명만 적어주면 됩니다.


-s "파일명"

즉 위의 문장 자체가 파일 사이즈로 치환됩니다.


펄로, 파일 사이즈(Byte 단위 크기) 구하기 예제 소스


파일명: 0.pl
※ 아래 박스 클릭 후, 키보드 화살표 키로 좌우 스크롤 가능함
#!/usr/bin/perl
use strict; use warnings;

  my $i;


  ########################################################################
  # 파일 사이즈 구하기

  $i = -s "test.jpg";
  print "File Size: ", $i, " bytes\n";

  # 만약 "test.jpg"가 19.7KB (20,263 바이트) 짜리 파일이라면
  # 출력 결과: File Size: 20263 bytes




  ########################################################################
  # 경로까지 지정하여 파일 사이즈 구하기 (윈도우의 경우)
  print -s "D:/Warehouse/ubuntu-6.06.1-server-i386.iso", "\n";
  # 출력 결과: 453132288




  ########################################################################
  # if문에서 파일 크기를 조건으로 판단하기
  # ubuntu-6.06.1-server-i386.iso 파일의 크기는 432MB (453,132,288 바이트)

  if (-s "D:/Warehouse/ubuntu-6.06.1-server-i386.iso" > 104857600) {
    print "100메가보다 큰 파일이군요\n";
  } else {
    print "100메가보다 작은 파일이군요\n";
  }
  # 출력 결과: 100메가보다 큰 파일이군요





tag: perl
Perl | 펄

0 Comments:

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Previous Posts
Monthly Archives
Top