Perl과 함께 reCAPTCHA 사용

중요: reCAPTCHA API 버전 1.0은 더 이상 지원되지 않습니다. 버전 2.0으로 업그레이드하세요. 자세히 알아보기

reCAPTCHA Perl 모듈은 보안문자를 배치하는 간단한 방법을 제공합니다. 봇의 악용을 막을 수 있습니다. 이 모듈은 reCAPTCHA API:

Perl과 함께 reCAPTCHA를 사용하려면 reCAPTCHA Perl 모듈 (앤디 암스트롱 제공)을 참조하세요. 이 모듈은 가상 머신 (웹 서버)에서 실행할 수 있습니다. 모듈은 LWP::UserAgent 모듈에 종속됩니다. 및 HTML::Tiny, 둘 다 이것도 설치해야 합니다 다음은 Perl 설치에 대한 몇 가지 기본 안내입니다. 모듈을 참조하세요.

빠른 시작

다음은 API 키를 등록하고 reCAPTCHA Perl 모듈을 다운로드한 후 reCAPTCHA를 설치할 수 있습니다.

클라이언트 측 (보안문자 이미지를 표시하는 방법)

Perl 모듈을 사용하여 reCAPTCHA 위젯을 표시하려면 다음과 같이 reCAPTCHA 위젯이 위치할 양식 요소가 있는 파일 상단 근처에 있는 이 줄 표시됩니다.

    use Captcha::reCAPTCHA;

그런 다음 reCAPTCHA의 인스턴스를 만들어야 합니다.

    my $c = Captcha::reCAPTCHA->new;

마지막으로 reCAPTCHA 위젯을 표시하려면 다음과 같은 줄을 <form> 태그:

    print $c->get_html("your_public_key");

따라서 코드는 다음과 같을 수 있습니다.

    use Captcha::reCAPTCHA;

    my $c = Captcha::reCAPTCHA->new;

    print <<EOT;
    <html>
      <body>
        <form action="" method="post">
    EOT

    print $c->get_html("your_public_key");

    print <<EOT;
        <input type="submit" value="submit" />
        </form>
      </body>
    </html>
    EOT

your_public_key를 API 키입니다.

서버 측 (사용자가 올바른 답변을 입력했는지 테스트하는 방법)

다음은 reCAPTCHA 답변을 확인하는 방법의 뼈대입니다.

    use Captcha::reCAPTCHA;

    my $c = Captcha::reCAPTCHA->new;

    my $challenge = param 'recaptcha_challenge_field';
    my $response = param 'recaptcha_response_field';

    # Verify submission
    my $result = $c->check_answer(
        "your_private_key", $ENV{'REMOTE_ADDR'},
        $challenge, $response
    );

    if ( $result->{is_valid} ) {
        print "Yes!";
    }
    else {
        # Error
        print "No";
    }

추가 자료

  • 디자인 맞춤설정
  • 도움말 및 가이드라인
  • 문제 해결
    •