Tools/Scripts/create-exports - WebKit - Git at Google

 #!/usr/bin/env perl

 use warnings;

 while (<>) {
     print "$1\n" if /^\s*\"(.+)\", referenced from:$/;
 }
	#!/usr/bin/env perl

	use warnings;

	while (<>) {
	print "$1\n" if /^\s*\"(.+)\", referenced from:$/;
	}