data_from_hash.pl

#!/usr/bin/perl












__DATA__
$varname{servername} = [['singho', 'dev', 'nixtux', 'email@add.com']; ['omsingh', 'dev', 'unix', 'ompsingh@gmail.com']]