Help for this page
$ perl attenuator_pad.pl ... RESULT! N: in_neg(1) in_pos(2) (1 2 52.5)
$ cat attenuator_pad.pl #!env perl ... return $ngr; }