Perl 펄] 파일 존재 여부 판단, 디렉토리 있는지 확인 함수; File-Directory Exist?

#!/usr/bin/perl
use strict; use warnings;


  # 파일 존재 여부 판단
  if (-f "test.txt") {
    print "파일 있음\n";
  }
  else {
    print STDERR "그런 파일이 없음.\n";
  }



  # 디렉토리 존재 여부 판단
  if (-d "000") {
    print "OK! 그런 디렉토리가 있음\n";
  }
  else {
    print STDERR "그런 디렉토리가 없음.\n";
  }