UseModWiki소스수정/GetUniqueUploadFilename함수

1. GetUniqueUploadFilename 함수

1.1. wiki.pl 수정

1.2. 추가 업데이트 내역

1.3. 사용자 의견

1. GetUniqueUploadFilename 함수

UseModWiki소스수정/파일업로드_중복이름_처리의 내용을 적용.

/화일업로드와 /오에카키에서, 파일 이름이 중복될 경우, 파일명_숫자.확장자 형태로 이름을 붙이도록 변경.

1.1. wiki.pl 수정

# $dir내에 $file이름과 동일한 파일이 있을 경우 뒤에 숫자를 붙여 겹치지 않는 번호를 반환함
sub GetUniqueUploadFilename {
    my ( $dir, $file ) = @_;

    return $file if ( not -f "$dir/$file" );

    my ( $filename, $ext ) = ( $file =~ m/^(.+)(\.[^.]+)$/ );
    unless ( $ext ) {
        $filename = $file;
        $ext      = '';
    }

    my $num = 1;
    while ( -f "$dir/${filename}_$num$ext" ) {
        $num++;
    }

    return "${filename}_$num$ext";
}

1.2. 추가 업데이트 내역

1.3. 사용자 의견