From 1db6385fefd0bc6ec693d3a7e862d3770946b9a1 Mon Sep 17 00:00:00 2001 From: ian Date: Mon, 19 Apr 2004 00:20:44 +0000 Subject: [PATCH] remove trailing 0s --- farnell/bulkres-select-gen.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/farnell/bulkres-select-gen.pl b/farnell/bulkres-select-gen.pl index 1b6c19f..b81d636 100755 --- 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 $!; } } } -- 2.30.2