perl regex - to extract function definition arguments

Question

eErrorT ChainCtrlExit (ChainCtrlT * pChainCtrl)
ChanT* ChainCtrlGetBitStreamChan (ChainCtrlT * pChainCtrl, 
char * name 
)
eErrorT ChainCtrlInit (ChainCtrlT * pChainCtrl, 
char * name, 
int instance, 
void * pOwner 
)

int SymContDecNamesCount = (sizeof(SymContDecNames)/sizeof(SymContDecNames[0]))
char* SymContEncNames[]
int SymContEncNamesCount = (sizeof(SymContEncNames)/sizeof(SymContEncNames[0]))

I want to extarct only function arguments ...that is

OUTPUT I NEED extract only function definition arguments in one line

 ChainCtrlT * pChainCtrl
 ChainCtrlT * pChainCtrl, char * name 
 ChainCtrlT * pChainCtrl, char * name, int instance, void * pOwner

MY CODE

open(FILE, "< functions2.txt") or die $!;
open(FILE1, "> functions3.txt") or die $!;            

my @Array1=<FILE>;
foreach my $text (@Array1){
   $text =~ /\((.+)\)/;
   print FILE1 $text;
 }

But it is extracting everything into new file. Basically dulication of file content

mpapec · Accepted Answer · 2013-09-26 09:37:48Z

2

open(my $FILE, "<", "functions2.txt") or die $!;
open(my $FILE1, ">", "functions3.txt") or die $!;            


my $s = do { local $/; <$FILE>; };
while ($s =~ /^ \S+ \s+ \S+ \s* \( (.+?) \) /xsmg) {
  my $arg = $1;
  $arg =~ tr|\r\n||d;
  print $FILE1 "$arg\n";
}

edited Sep 26, 2013 at 9:37

answered Sep 26, 2013 at 9:32

mpapec

50.7k8 gold badges72 silver badges133 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Ad-vic Over a year ago

works fine. As i am new to perl, it will be great if you could share some links to understand how to solve such issue rather than just copying blindly your code.

mpapec Over a year ago

@Ad-vic check perldoc documentation => link1 link2 link3

Collectives™ on Stack Overflow

perl regex - to extract function definition arguments

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related