Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
}

say @newlines;

> perl 1081659.pl
RECORDNAME foo bar baz RECORDIP 127.2.2.1
RECORDNAME 1 2 3 4 5 RECORDIP 127.1.1.1
...
www.test.sample foo bar baz nowhere_ville 127.2.2.1
www.test.sample 1 2 3 4 5 nowhere_ville 127.1.1.1
www.test.sample abcd e fgh ij nowhere_ville 127.0.0.1