현재 위치

홈 ›› Forums ›› 공부 ›› 프로그래밍 QnA

펄 파일이동에 관하여 질문이요!

majestic의 이미지
글쓴이: majestic / 작성시간: 금, 2018/10/19 - 3:12오후

*폴더 = 이름이 *인 폴더

         A폴더                                           B폴더

    abc_def43.jpg                                jpg폴더(abc_def43.jpg)    
    abcde_11.txt                   ->            txt폴더(abcde_11.txt) 
    abcde_ccc.exe               B폴더로이동        exe폴더(abcde_ccc.exe)

예를 들어 확장자가 다른 파일 세개가 있습니다.

B 폴더안에 파일 확장자별 디렉토리를 만들고 그 디렉토리이름에 맞게 파일을 이동하는 코드를 짜고 있는데

my ($fileNameOnly, $dir, $ext) = fileparse($file, '.[^.]*');를 써서

if로 조건걸어서 mkdir로 어떤 파일의 확장명폴더 만드는것까진 설정했습니다.

폴더이름이 확장자명인 폴더에 임의의 파일을 확장명대로 이동시키는걸 어떤식으로 접근해야하나요??

Forums: 
프로그래밍 QnA
raymundo의 이미지

글쓴이: raymundo / 작성시간: 금, 2018/10/19 - 3:52오후

정확히 어느 부분에서 막힌다는 건지 애매합니다만, 딱히 if가 필요할 일은 안 보이는데요.

(이미 디렉토리가 만들어졌는데 mkdir 하면 false를 반환하긴 하지만 에러가 나진 않으니까)

파일을 이동하는 건 기본 함수인 rename 을 쓰셔도 되고, 좀 더 유연하게는 File::Copy 모듈의 move 함수를 쓰셔도 됩니다.

use File::Copy qw(move);
use File::Basename qw(fileparse);
use File::Path qw(make_path);
 
my $file = './A/abc_def43.jpg';
my ($fileNameOnly, $dir, $ext) = fileparse($file, '.[^.]*');
 
# $ext = '.jpg';
$ext =~ s/^\.//;   # 앞의 . 제거
 
make_path("./B/$ext");    # 디렉토리 만들고
move($file, "./B/$ext/"); # 이동

좋은 하루 되세요!

majestic의 이미지

글쓴이: majestic / 작성시간: 금, 2018/10/19 - 4:14오후

감사합니다! qw연산자를 한번도 안써봤는데 이런법도있군요

제가 if쓴건 ext를 이용해 확장명이 a일때 a이름폴더 만들고 b이면 b이름폴더만들고 이런식으로 썼습니다.. 저렇게 간단한 법도 있군요

댓글 달기

텍스트 포맷에 대한 자세한 정보

Filtered HTML

  • 텍스트에 BBCode 태그를 사용할 수 있습니다. URL은 자동으로 링크 됩니다.
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param><hr>
  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.

BBCode

  • 텍스트에 BBCode 태그를 사용할 수 있습니다. URL은 자동으로 링크 됩니다.
  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param>
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.

Textile

  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • You can use Textile markup to format text.
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param><hr>

Markdown

  • 다음 태그를 이용하여 소스 코드 구문 강조를 할 수 있습니다: <code>, <blockcode>, <apache>, <applescript>, <autoconf>, <awk>, <bash>, <c>, <cpp>, <css>, <diff>, <drupal5>, <drupal6>, <gdb>, <html>, <html5>, <java>, <javascript>, <ldif>, <lua>, <make>, <mysql>, <perl>, <perl6>, <php>, <pgsql>, <proftpd>, <python>, <reg>, <spec>, <ruby>. 지원하는 태그 형식: <foo>, [foo].
  • Quick Tips:
    • Two or more spaces at a line's end = Line break
    • Double returns = Paragraph
    • *Single asterisks* or _single underscores_ = Emphasis
    • **Double** or __double__ = Strong
    • This is [a link](http://the.link.example.com "The optional title text")
    For complete details on the Markdown syntax, see the Markdown documentation and Markdown Extra documentation for tables, footnotes, and more.
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.
  • 사용할 수 있는 HTML 태그: <p><div><span><br><a><em><strong><del><ins><b><i><u><s><pre><code><cite><blockquote><ul><ol><li><dl><dt><dd><table><tr><td><th><thead><tbody><h1><h2><h3><h4><h5><h6><img><embed><object><param><hr>

Plain text

  • HTML 태그를 사용할 수 없습니다.
  • web 주소와/이메일 주소를 클릭할 수 있는 링크로 자동으로 바꿉니다.
  • 줄과 단락은 자동으로 분리됩니다.
댓글 첨부 파일
이 댓글에 이미지나 파일을 업로드 합니다.
파일 크기는 8 MB보다 작아야 합니다.
허용할 파일 형식: txt pdf doc xls gif jpg jpeg mp3 png rar zip.
CAPTCHA
이것은 자동으로 스팸을 올리는 것을 막기 위해서 제공됩니다.