A classic: Yes, even you can use CPAN

Anyway, it's actually pretty simple. Since all arguments are literals and thus constants, you install Net::DNS::Packet on one machine once, dump $dns_packet->data(), and use the resulting string by copy&paste wherever you want to use it.

Update: Small nit:

$dnspacket->header->ra(0); #Recursion Desired
$dnspacket->header->rd(1); #Recursion Available
[download]

The comments are the wrong way around, the should be switched.