neelsmith

while (<STDIN>) {
   my $currLine = $_;
   # accept deletions:                                                          
   $currLine =~ s#{--[^\-]+--}##g;
   # accept additions:                                                          
   $currLine =~ s#{\+\+([^+]*)\+\+}#$1#g;
   # accept changes:                                                            
   $currLine =~ s#{~~[^~]+~>([^~]+)~~}#$1#;
   print $currLine;
}

neelsmith

<ul id="citekit-sources">
  <li class="citekit-source cite-text citekit-default">http://DEFAULTCTS</li>
  <li class="citekit-source cite-image citekit-default">http://DEFAULTIMGSVC</li>
  <li class="citekit-source cite-collection citekit-default">http://DEFAULTCOLL</li>
</ul>

neelsmith

export EDITOR="/usr/bin/open -n -W -a /Applications/TextEdit.app"