12 lines
242 B
12 lines
242 B
6 years ago
|
#! /usr/bin/perl
|
||
|
|
|
||
|
|
#
|
||
|
|
# git diff -U0 SHA...develop unpacked/extensions unpacked/jax unpacked/MathJax.js | ./getStrings | sort | uniq
|
||
|
|
#
|
||
|
|
|
||
|
|
while ($line = <>) {
|
||
|
|
chomp($line);
|
||
|
|
while ($line =~ s/("(\\.|.)*?"|'(\\.|.)*?')//) {print $1,"\n"}
|
||
|
|
}
|
||
|
|
1;
|