특정 비트 전송률의 모든 미디어 파일을 하드 드라이브에서 검색하시겠습니까?

Question

나는 Windows 7이 메타 데이터의 파일 비트 전송률을 '알지'못한다고 생각하기 때문에 그렇게 간단하게 할 수 있다고 생각하지 않습니다.

그러므로 '스스로 하라'고 해야 합니다. 나는 접근 방식을 취할 것입니다 :

Perl을 얻으십시오 (활성 상태하나를 하세요, 다른 것도 있어요)
MP3::Info모듈( )을 설치합니다 cpan install MP3::Info. 몇 가지 질문이 표시되므로 기본값을 그대로 적용하세요.
이를 수행하려면 Perl 스크립트를 실행하십시오.

이 같은:

use strict;
use warnings;

use MP3::Info;
use File::Find;

my $bitrate_target = 320;

sub print_if_bitrate {
    return unless m/\.mp3$/;    #skip any non-mp3 files.
    my $info = get_mp3info($File::Find::name);
    if ( not defined $info ) {
        print "$File::Find::name has an invalid tag\n";
        return;
    }
    my $bitrate = $info->{BITRATE};
    if ( not defined $bitrate ) {
        print "$File::Find::name - no bit rate defined\n";
        return;
    }
    if ( $bitrate >= $bitrate_target ) {
        print "($bitrate) $File::Find::name\n";
    }
}

#double slashed needed, because backslash has a special meaning.
find( \&print_if_bitrate, 'C:\\Users\\me\\MP3' );

('find_mp3.pl'로 저장 - activestate 설치 프로그램이 .pl파일과 연결되어야 합니다.)

내 Windows 7 시스템에서 테스트되었습니다. (320개의 샘플 파일이 없기 때문에 비트 전송률은 낮지만)

Answer 1