Se - slurping zero bytes at end

diff --git a/evolis-printer.pl b/evolis-printer.pl
index 23f431a..2b1845c 100755 (executable)
--- a/evolis-printer.pl
+++ b/evolis-printer.pl
@@ -81,6 +81,10 @@ while(<>) {
                my $h = int( $len / 128 );
                save_pbm $path, $w, $h, $data;
 
+       } elsif ( $c eq 'Se' ) {
+               my $zero = <>;
+               print "Se - slurping zero bytes at end ",dump($zero);
+               exit 0;
        } else {
                warn "UNKNOWN: $c ", dump(@a);
        }