From 082165773ea9fdd419126925bccbcf5a304d8b96 Mon Sep 17 00:00:00 2001 From: "Kyle J. McKay" Date: Mon, 10 Aug 2020 22:20:46 -0700 Subject: [PATCH] toolbox/perlcrc32.pl: pick up squelched warning version Signed-off-by: Kyle J. McKay --- toolbox/perlcrc32.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/toolbox/perlcrc32.pl b/toolbox/perlcrc32.pl index c029125..e4d6a5b 100755 --- a/toolbox/perlcrc32.pl +++ b/toolbox/perlcrc32.pl @@ -17,7 +17,7 @@ # ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF # OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -# Version 1.0.0 +# Version 1.0.1 use strict; use warnings; @@ -83,7 +83,10 @@ sub main { $fmt .= "%08$opt_x" if $opt_x; $fmt .= ($opt_x ? ' ' : '') . '%u' if $opt_d; $fmt .= "\n" if $opt_x || $opt_d; - printf $fmt, $tapline, $crc32, $crc32; + { + no warnings; + printf $fmt, $tapline, $crc32, $crc32; + } exit($ec); } -- 2.11.4.GIT