repo.or.cz
/
sunny256-utils.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
mdisk: Delete unnecessary use of `strip_diskname` and use it elsewhere
[sunny256-utils.git]
/
snu_epstat
blob
45715e1c351730540887ec0297f17ab16295798f
1
#!/usr/bin/env perl
2
3
# snu_epstat
4
# File ID: 2a0a79c0-5d44-11df-a312-90e6ba3022ac
5
# Snur outputen fra epstat,v 1.3 og tidlligere og plasserer datoen først.
6
7
use
strict
;
8
use
warnings
;
9
10
while
(<>) {
11
if
(
/^\s+(\d+)\s+(.*)$/
) {
12
# s/ /\t/;
13
print
(
"
$2
\t
$1
\n
"
);
14
}
else
{
15
print
;
16
}
17
}