トップ
新規
一覧
単語検索
最終更新
ヘルプ
ログイン
アールメカブ
Perl_prosperNote
をテンプレートにして作成
開始行:
[[Programming]]
prosperからコメント部分を取り出す.余りにお手軽過ぎるが,...
#!/usr/bin/perl
$document;
while(<>){
if(/begin\{document\}/){
$document = 1;
print "\documentclass [a4paper]{jsarticle} \n
\begin{document}";
next;
}
elsif(/EndOfNote/){
$flag = 1;
}
elsif(/footnote/){
$flag = 0;
}
elsif(/end\{document\}/{
print;
last;
}
if($document and !$flag){
print ;
print "\n";
}
}
終了行:
[[Programming]]
prosperからコメント部分を取り出す.余りにお手軽過ぎるが,...
#!/usr/bin/perl
$document;
while(<>){
if(/begin\{document\}/){
$document = 1;
print "\documentclass [a4paper]{jsarticle} \n
\begin{document}";
next;
}
elsif(/EndOfNote/){
$flag = 1;
}
elsif(/footnote/){
$flag = 0;
}
elsif(/end\{document\}/{
print;
last;
}
if($document and !$flag){
print ;
print "\n";
}
}
ページ名: