OSDN Git Service

set version as 1.4.4-snapshot
[howm/howm.git] / ext / hsplit.rb
1 #!/usr/bin/ruby -s
2 # -*- coding: euc-jp -*-
3 # -*- Ruby -*-
4
5 def usage
6   name = File::basename $0
7   print <<EOU
8 #{name}: howm ¥á¥â¤ò, °ì¥á¥â°ì¥Õ¥¡¥¤¥ë¤Ëʬ³ä (¼êÈ´¤­»ÅÍÍ)
9 (Îã)
10   #{name} 2004_10_10.txt
11   ¢ª 2004_10_10.txt.aa, 2004_10_10.txt.ab, ¡Ä ¤¬¤Ç¤­¤ë
12 (¥ª¥×¥·¥ç¥óÎã)
13   -prefix=hoge.     ¢ª hoge.aa, hoge.ab, ¡Ä ¤¬¤Ç¤­¤ë
14   -help ¤Þ¤¿¤Ï -h   ¢ª ¤³¤Î¥á¥Ã¥»¡¼¥¸¤òɽ¼¨
15 EOU
16 end
17
18 #####################################
19
20 if ($help || $h || ARGV.length == 0)
21   usage
22   exit 0
23 end
24
25 $prefix ||= ARGV[0] + '.'
26 ext = 'aa'
27
28 ARGF.readlines.join.split(/^= /).each_with_index{|x, i|
29   next if x.empty?
30   x = '= ' + x if i > 0
31   open($prefix + ext, 'w'){|io| io.print x}
32   ext.succ!
33 }