######## [loop through configs] ########

@configs = qw(torrc);                                                   # every config file! like: torrc torrc0 torrc1 

for (1..scalar @configs) {

    open config, "<", "/etc/tor/" . $configs[$_ -1] || die "Cannot open $configs[$_ -1]\n";

        while (<config>) {

            $server_name = $1       if /^Nickname (\w+)/i;

            $server_type = 'Bridge' if /^BridgeRelay 1/i;

            $data_dir    = $1       if /^DataDirectory (.*)/i;

            $pidfile     = $1       if /^PidFile (.*)/i;

            $obfs        = 'True'   if /^ServerTransportPlugin obfs2,obfs3/i;

            $ip          = $1       if /^OutboundBindAddress (\d+\.\d+\.\d+\.\d+)/i;

        }