Help for this page

Select Code to Download

Select or download this

while (<CONFIG_FILE>) {
  if(/^frz\s+=\s+(\w+)\;/)
...
  }
}
print "$bar\n";