Select Code to Download

#!/usr/bin/env perl

...
  #define code 0
  #define const (100/5)
  #define flag_condn 1

$ pm_define_extract.pl
thread
flag
code
flag_condn

    print "$def\n" if ! $val or $val =~ /^0|1$/;