#!perl
use strict;
use Function::Parameters;
fun get_ip( $agent ) {
}
fun get_record( $agent, $target_name ) {
    for my $record ( @$records ) {
    }
}
'ok'