comparison paper/md2tex.pl @ 23:2be09c284a2e

add meta-cg-dg.pdf
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Mon, 04 May 2020 14:25:42 +0900
parents 13d8fe4cfc5c
children d2a1d3d75484
comparison
equal deleted inserted replaced
22:d933923009db 23:2be09c284a2e
44 my $inlineCodeBlock = $1; 44 my $inlineCodeBlock = $1;
45 $inlineCodeBlock =~ s/_/\\_/g; 45 $inlineCodeBlock =~ s/_/\\_/g;
46 $line =~ s/`([\s\w_\-\\]+)`/\\texttt{$inlineCodeBlock}/; 46 $line =~ s/`([\s\w_\-\\]+)`/\\texttt{$inlineCodeBlock}/;
47 } 47 }
48 48
49 if ($line =~ /!\[(.*),\s*(.*)\]\((.*)\)/) {
50 $line = <<"EOF";
51 \\begin{figure}[tb]
52 \\begin{center}
53 \\includegraphics[width=70mm]{$3}
54 \\end{center}
55 \\caption{$2}
56 \\label{$1}
57 \\end{figure}
58 EOF
59 }
60
49 if ($line =~ /^\[(.*),\s*(.*)\]\((.*)\)/) { 61 if ($line =~ /^\[(.*),\s*(.*)\]\((.*)\)/) {
50 $line = '\l' ."stinputlisting[label=$1, caption={$2}]{$3}\n"; 62 $line = '\l' ."stinputlisting[label=$1, caption={$2}]{$3}\n";
51 } 63 }
52 print $texFH $line; 64 print $texFH $line;
53 } 65 }