added script used to split cards.txt

master
melvin 2011-11-09 22:33:40 +08:00
parent c433ccce79
commit 63e3666d92
1 changed files with 13 additions and 0 deletions

13
scripts/split_cards.awk Normal file
View File

@ -0,0 +1,13 @@
/^>/ {
gsub(">","")
name = $0
fn = gensub("[^A-Za-z]", "_", "g", name) ".txt";
print ">" name >> fn
next
}
{
print $0 >> fn
}