File: protobuild.pl

package info (click to toggle)
libapache-mod-mp3 0.39-5
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 436 kB
  • ctags: 432
  • sloc: ansic: 3,135; perl: 521; sh: 176; makefile: 50
file content (21 lines) | stat: -rwxr-xr-x 219 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#!/usr/bin/perl -w
use strict;

my @array = `grep MP3_EXPORT src/*.c`;
print <<EOF;
/*
 * Prototypes
 */

EOF

for (@array) {
	s/^.*://; 
	s/^MP3_EXPORT\((.+)/$1/; 
	s/\)//; 
	s/ {$//; 
	s/{
$//; 
	s/$/;/;
	print $_;
}