chiark
/
gitweb
/
~ijackson
/
trains.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1c93a87
)
remove trailing 0s
author
ian
<ian>
Mon, 19 Apr 2004 00:20:44 +0000
(
00:20
+0000)
committer
ian
<ian>
Mon, 19 Apr 2004 00:20:44 +0000
(
00:20
+0000)
farnell/bulkres-select-gen.pl
patch
|
blob
|
history
diff --git
a/farnell/bulkres-select-gen.pl
b/farnell/bulkres-select-gen.pl
index 1b6c19fec57e8d48c2c26ef20c62ed8fcc9c0bb0..b81d63618b3e79db5b15b6c3a07869debccf025e 100755
(executable)
--- a/
farnell/bulkres-select-gen.pl
+++ b/
farnell/bulkres-select-gen.pl
@@
-19,7
+19,8
@@
sub addm ($$) {
$_= $decade;
s/x/ substr($value,0,1) /e;
s/x/ substr($value,1,1) /e;
- printf "\tstd %s \t%d\n", $_, $qty or die $!;
+ s/0$//;
+ printf "\tstd %s \t%d=\n", $_, $qty or die $!;
}
}
}