From 4bfc8d2a1b2f159f2b96107bcda51dfa6a9dc787 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 15 Aug 2010 01:52:48 +0200 Subject: [PATCH] check if compression is supported --- evolis-printer.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/evolis-printer.pl b/evolis-printer.pl index 11bd8b7..54e2ceb 100755 --- a/evolis-printer.pl +++ b/evolis-printer.pl @@ -54,6 +54,8 @@ while(<>) { } $len == length $comp or warn "wrong length $len != ", length $comp; + die "compression not supported" unless $color =~ m/[ko]/; + my $data; my $i = 0; while ( $i < length $comp ) { -- 2.20.1