Help for this page

Select Code to Download


  1. or download this
    _____________________________________________
    
    ...
        c = 4
        d = 5
    __________________________________________
    
  2. or download this
    _____________________________________________
    mm struct { 
    ...
      }
    }
    _________________________________________________
    
  3. or download this
    sub change_to_normal {
      my $str = shift;
    ...
      my $replace = '"$1 = \{"';       #add {
      $str =~ s/(.*)=\s*;/$replace/eeg;
    }