--- 3m-810.pl 2010/02/09 14:52:13 62 +++ 3m-810.pl 2010/02/11 10:52:14 63 @@ -121,6 +121,7 @@ next unless $p =~ m/^tag_(\S+)/; my $tag = $1; my $content = "\x04\x11\x00\x01" . $param->{$p}; + $content = "\x00" if $param->{$p} eq 'blank'; $status = 302; warn "PROGRAM $tag $content\n";