blob: c645d55eb2f2a78bcf35b904a3a09a66d0d2440e [file] [log] [blame]
#!/usr/bin/perl -w
while (<>) {
print "$1\n" if /^\s*\"(.+)\", referenced from:$/;
}