What do you mean by "can't get past the '|' in the nslookup"? Consider this example.

#!/usr/bin/perl

use strict;

my $node = qx( nslookup www.perlmonks.org | 
               awk -F Name: '{ print \$2 }' );
print $node;
[download]