數(shù)據(jù)展開的腳本

gr33n

各位大大好:

1: 一個文本, 每行是由字符 A, B, C, D 字符組成的。如:

A[BC]D[ABC]DA[BC]D
[BCA][ADB]DAA[BC]

2: [AB], [ABCD]..是一組. 在每一組之內(nèi), 字符沒有重復(fù), 如:

[AAB]   # A 重復(fù)
[ABC]   # 沒有重復(fù)

3: 數(shù)據(jù)依序擴展

一行比如:  A[BC]D

數(shù)據(jù)依序擴展為：

ABD
ACD

一行比如: A[BC]D[AC]
數(shù)據(jù)依序擴展為：

ABDA
ABDC
ACDA
ACDC

4: 行1 輸出 file.1, 行2 輸出 file.2....

5: 每文本按照 limit 值 輸出, (輸出行數(shù) <= limit):

一行比如: A[BC]D[AC]

比如: limit = 3, 輸出行數(shù) = 3

ABDA
ABDC
ACDA

一行比如: A[BC]
比如: limit = 5, 輸出:

AB
AC

測試文件如下：( 假設(shè) limit = 10 )

A[BC]D[ABC]DA[BC]D
[BCA][ADB]DAA[BC]
A[BC]D[AC]


結(jié)果:

file.1:
ABDADABD
ABDADACD
ABDBDABD
ABDBDACD
ABDCDABD
ABDCDACD
ACDADABD
ACDADACD
ACDBDABD
ACDBDACD

file.2:
BADAAB
BADAAC
BDDAAB
BDDAAC
BBDAAB
BBDAAC
CADAAB
CADAAC
CDDAAB
CDDAAC

file.3:
ABDA
ABDC
ACDA
ACDC



# 實際的一行數(shù)據(jù)可能看起來像這樣
A[BC]D[AC]DAABACDA[AC]DDACA[BC]D[AC]DAAA[BC]DDDACB[AC]DAABCCD[AC]DCCA[BC]D[AC]DCA[BC]DACDA[BC]D[ABC]DA[BC]D[AC]DABCD[ACB]DA[BC]DACCDABCD[DC]DA[BCA]DDABCCBB

各位大大能不能給我這個數(shù)據(jù)擴展的腳本 ?

rubyish

1. #!/usr/bin/ruby -w
   
2. limit = ARGV.shift.to_i
   
3. ARGF.each.with_index(1) do |l, i|
   
4.   count = 0
   
5.   array = l.chomp.split(/(?=\[)|(?<=\])/).map do |e|
   
6.     e[0] == ?[ ? e.scan(/\w/).to_a : [e]
   
7.   end
   
8.   File.open("file.#{i}", "w") do |fh|
   
9.     array.shift.product(*array) do |e|
   
10.       fh.puts e.join
    
11.       break if (count += 1) == limit
    
12.     end
    
13.   end
    
14. end

復(fù)制代碼