or download this
my $sth = $dbh->prepare( "SELECT host, name, type, address, netmask,
+gateway FROM $table_name" );
#(PRINTED)
app17, eth1, static, 192.168.0.2, 255.255.255.0, 192.168.0.1
app15, eth0, dhcp, , ,
app15, eth1, static, 192.168.0.4, 255.255.255.0, 192.168.0.1
app12, eth1, static, 192.168.0.5, 255.255.255.0, 192.168.0.1