Select Code to Download

****************************************
Report  : noise_parameters
...
 es (esh)   129.19     0.38    -0.17
 es (esm)   184.15     0.49    -0.14
and so on...

 es,135.42,0.37,"Waived,by","Waived,Date","Approved,by","Approved,date
+"
 es,129.19,0.38,,"Waived,by","Waived,Date","Approved,by","Approved,dat
+e"

****************************************
Report  : noise_parameters
...
  es (esm)   184.15     0.49    -0.14
  es (esb)   208.55     0.48    -0.13
and so on

#! /tools/perl/5.8.8/linux/bin/perl

...
close $filter;
close $input;
close $output;