Home | History | Annotate | Download | only in Scripts 
      1 #!/usr/bin/perl -w
      2 
      3 while (<>) {
      4     print "$1\n" if /^\s*\"(.+)\", referenced from:$/;
      5 }
      6