Help for this page
#! perl -slw use strict; ... __DATA__ [snip... your sample data here]
C:\test>junk denlas02 [146.xxx.xxx.xxx] is a member of DMZ ppplas12 [10.50.33.26] is a member of CRIT