Help for this page
Select Code to Download
Select
or
download this
use File::Slurp; @datb = grep { /$cnip/ } read_file('tech3');