Select Code to Download

vm,farm,dmz
name1,farm1,z1
name2,farm2,z2
name3,farm3,z3

#!/usr/bin/perl -w

...

$dbh->disconnect();
close $fh;