戯術者の日記

<pre class="brush: text; first-line: 2; highlighter: [2,3,4]">
...
</pre>

1行目
2行目
3行目
4行目

2行目
3行目
4行目
5行目

while (<>) {
  print unless /^$/;
}

--- chalow	(revision 1845)
+++ chalow	(revision 1846)
@@ -1359,7 +1359,7 @@
 
     ### ソースエスケープ - "&" や "<" などを置換し pre を付ける
     $num_of_escaped_src = 0;
-    $$strp =~ s!\[src(\s\w+)?\](.*?)\[/src\]!
+    $$strp =~ s!\[src(?:\s([\s\w:,]+))?\](.*?)\[/src\]!
$escaped_src{++$num_of_escaped_src} = $2,
$escaped_src_type{$num_of_escaped_src} = $1,
$escaped_src{$num_of_escaped_src} =~ s/&/&amp;/g,
@@ -1381,14 +1381,33 @@
     $$strp =~ s|\x7\x13(\d+)\x3|eval($escaped_plugin{$1})|ge;
     ### ソースアンエスケープ - pre 追加
     # todo(SyntaxHilighter)
-    $$strp =~ s|\x6\x13(\d+)\x3|"<pre class=\"brush:".(length $escaped_src_type{$1}? $escaped_src_type{$1}: "plain").";\">$escaped_src{$1}</pre>"|eg;
+    $$strp =~ s|\x6\x13(\d+)\x3|"<pre class=\"brush: ".get_syntax_opt($escaped_src_type{$1}).";\">$escaped_src{$1}</pre>"|eg;
     # <p>は使ってないので
     #$$strp =~ s|\x6\x13(\d+)\x3|</p><pre>$escaped_src{$1}</pre><p>|g;
     ### HTML アンエスケープ
     $$strp =~ s|\x5\x13(\d+)\x3|$escaped_string{$1}|g;
 }
 
+sub get_syntax_opt {
+  my $lang = "plain";
+  my @opts;
+  for (split /\s+/, shift) {
+    if (/^[^:]+$/) {
+      $lang = $_;
+    }
+    if (/f:(\d+)/) {
+      push @opts, "first-line: $1";
+    }
+    if (/h:([\d,]+)/) {
+      my $t = $1;
+      push @opts, "highlight: [$1]";
+    }
+  }
+  unshift @opts, $lang;
+  return join "; ", @opts;
+}
 
+
 ### inside referrer のリンク作成
 sub get_inside_ref {
     my ($id) = @_;

- 項目
- 項目
-- 項目2段階目
--- 項目3段階目
---- 項目4段階目
- てへ

• 項目
• 項目
• 項目2段階目
• 項目3段階目
• 項目4段階目
• てへ

----

--- chalow	(revision 1840)
+++ chalow	(working copy)
@@ -517,7 +518,7 @@
     s!'''(.+?)'''!<strong>$1</strong>!gms;
     s!''(.+?)''!<em>$1</em>!gms;
     s!==(\S.+?)==!<s>$1</s>!gms;
-    s!^\-{4}!<hr />!gms;
+    s!^\-{4}$!<hr />!gms;
 
     ### URL。Hiki の記法を採用。
     s!\[\[(.+?)\s*\|\s*(.+?)\]\]!get_link_str($1, $2)!gmse;
@@ -544,6 +545,10 @@
     ### ヘッダ(Heading): "^= string" <h3>から</h3>
     s!^(=+)\s*(.*)!my $a=2+length $1; $a=($a<7)?$a:7; "<h$a>".$2."</h$a>"!gme;
 
+    ### リスト
+    # ^\t-+\s に反応。
+    $_ = listing($_);
+
     ### 日付で参照リンク
     # date ref : [YYYY-MM-DD]
     $_ = datestr2anchor($_);
@@ -577,11 +582,30 @@
 
     s!</pre><br />!</pre>!g;	# ad hoc
     s!</h(\d)><br />!</h$1>!g;
-
+    s!<ul><br />!<ul>!g;    # ad hoc
+    s!</li><br />!</li>!g;  # ad hoc
+    s!</ul><br />!</ul>!g;  # ad hoc
     return $_;
 }
 
+### リスト変換
+sub listing {
+  my $str = shift;
+  $str =~ s!(?:^(-+\s+.*))!<li>$1</li>!gm;
+  $str =~ s!((?:<li>.*</li>\n)+)!listing_f($1)!egm;
+  return $str;
+}
+sub listing_f {
+  my $str = shift;
 
+  $str =~ s!<li>-!<li>!gm;
+  $str = "<ul>".$str."</ul>";
+  $str =~ s!((<li>-.*\n)+)!listing_f($1)!egm;
+
+  return $str;
+}
+
+
 ### アイテムをHTMLに変換
 sub make_item_html {
     my ($e, $ymd, $i) = @_;

--- chalow.20110609	2011-02-06 04:25:50.718241770 +0900
+++ chalow	2011-06-12 20:42:48.266058342 +0900
@@ -539,4 +538,7 @@
     }
 
+    ### ヘッダ(Heading): "^= string" <h3>から</h3>
+    s!^(=+)\s*(.*)!my $a=2+length $1; $a=($a<7)?$a:7; "<h$a>".$2."</h$a>"!gme;
+
     ### 日付で参照リンク
     # date ref : [YYYY-MM-DD]
@@ -571,4 +573,5 @@
 
     s!</pre><br />!</pre>!g;	# ad hoc
+    s!</h(\d)><br />!</h$1>!g;
 
     return $_;

= タイトル
文章１
== サブタイトル
文章２

タイトル

サブタイトル

現在の年月日・時分秒を取得する。

Calendar cal = Calendar.getInstance();
int year = cal.get(Calendar.YEAR);
int month = cal.get(Calendar.MONTH);
int day = cal.get(Calendar.DAY_OF_MONTH);
int hour = cal.get(Calendar.HOUR_OF_DAY);
int min = cal.get(Calendar.MINUTE);
int sec = cal.get(Calendar.SECOND);
int msec = cal.get(Calendar.MILLISECOND);

現在のUNIX time(msec)を取得する。

long utc = System.currentTimeMillis();

UNIX timeを元に年月日・時分秒を取得する

long time = System.currentTimeMillis();
// time をなんか更新
Calendar cal = Calendar.getInstance();
cal.setTimeInMillis(time);

年月日・時分秒を指定してCalendarの日時をセット

Calendar cal = Calendar.getInstance();
cal.set(year, month - 1, day, hour, min, 0);

CalendarインスタンスからUNIX timeを取得

Calendar cal = Calendar.getInstance();
// cal をなんか操作
long utc = cal.getTimeInMillis();

CalendarインスタンスからDateインスタンスを取得

Calendar cal = Calendar.getInstance();
// calを何か操作
Date date = cal.getTime();

Dateインスタンスの指定でCalendarの日時をセット

long utc = System.currentTimeMillis();
Date date = new Date(utc);
Calendar cal = Calendar.getInstance();
cal.setTime(date);
System.out.println("eq? " + (cal.getTimeInMillis() == utc));
// 出力はtrue

DateインスタンスからUNIX timeを取得

// ↑のコードの続きで
System.out.println("eq? " + (date.getTime() == utc));
// 出力はtrue