patchfigs.rb - pandoc progit perl oneliner converted to ruby

patchfigs.rb

#
# see http://johnmacfarlane.net/pandoc/epub.html
#
# perl -i -0pe 's/^Insert\s*(.*)\.png\s*\n([^\n]*)$/!\[\2](..\/figures\/\1-tn.png)/mg' */*.markdown
#
# converted to "verbose" ruby

# encoding: UTF-8

Dir['*/*.markdown'].each do |filename|
  puts "  patching #{filename}..."
  
  text = File.read( filename )
  
  text = text.gsub( /^Insert\s*(.*)\.png\s*\n([^\n]*)$/ ) do |_|
      puts "    1: #{$1}"
      puts "    2: #{$2}"
    
      "!\[#{$2}](..\/figures\/#{$1}-tn.png)"
  end

  File.open( filename, 'w' ) do |file|
    file.write( text )
  end

end