#!/usr/bin/env ruby #epsファイル一覧の生成 eps_files = [] Dir::open('.').each{|file| if file =~ /\.eps$/ then eps_files << file end } if eps_files.empty? then puts "No figure found!!" exit end #exit #TeXファイルの生成 tex_doc =<<-'__TEX_STRING__' \documentclass[disablejfam]{jsarticle} % pakages \usepackage{times, mathptmx} \usepackage{graphicx} \usepackage{makeidx} \usepackage{bm} \usepackage{amsmath, amssymb} \usepackage{tabularx} \usepackage{slashbox} \usepackage{enumerate} \usepackage{hyperref} \usepackage{ascmac} % \usepackage[dvipdfm,bookmarks=true,bookmarksnumbered=true,bookmarkstype=toc,colorlinks=true,linkcolor=blue]{hyperref} \begin{document} __TEX_STRING__ doc_title = `pwd`.chop! if doc_title =~ %r|/([^/]+)$| then doc_title = $1 end doc_title.gsub!(/_/, '\_') tex_doc +=<<-__TEX_STRING__ \\title{Directory #{doc_title} Figures} __TEX_STRING__ tex_doc +=<<-'__TEX_STRING__' \maketitle \begin{center} \begin{screen} \vskip 100truemm \end{screen} \end{center} \clearpage \parindent 0truemm __TEX_STRING__ eps_files.each{|file| tex_doc +=<<-__TEX_STRING__ \\begin{minipage}{0.5\\textwidth} \\begin{center} #{file.gsub(/\.[^\.]+$/, '').gsub(/_/, ' ')} \\includegraphics[width=80mm]{#{file}} \\end{center} \\end{minipage} __TEX_STRING__ } tex_doc +=<<-'__TEX_STRING__' \end{document} __TEX_STRING__ ftex_name = 'figures2pdf.tex' ftex_p = open(ftex_name, 'w') ftex_p.print tex_doc ftex_p.close print `platex #{ftex_name}` print `platex #{ftex_name}` print `dvipdfmx #{ftex_name.gsub(/\.tex/, '.dvi')}` #print `rm *.eps`