blob: c0f705ef8ee14a8a74555aa3cd69d8e71aaf168d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
#! ./ruby
lines = 1000
if ($ARGV[0] =~ /^-(\d+)$/ )
lines = $1.to_i;
$ARGV.shift;
end
basename = $ARGV[0]
extname = "part"
part = 1
line = 0
fline = 0
for i in ifp = open(basename)
fline = fline + 1
end
ifp.close
parts = fline / lines + 1
for i in ifp = open(basename)
if line == 0
ofp = open(sprintf("%s.%s%02d", basename, extname, part), "w")
printf(ofp, "%s part%02d/%02d\n", basename, part, parts)
ofp.write("BEGIN--cut here--cut here\n")
end
ofp.write(i)
line = line + 1
if line >= lines
ofp.write("END--cut here--cut here\n")
ofp.close
part = part + 1
line = 0
end
end
ofp.write("END--cut here--cut here\n")
ofp.close
ifp.close
|