#!/usr/bin/env perl
-# $Id: tracemunch,v 1.16 2017/08/09 23:59:00 tom Exp $
+# $Id: tracemunch,v 1.17 2017/12/23 17:51:31 tom Exp $
##############################################################################
# Copyright (c) 1998-2005,2017 Free Software Foundation, Inc. #
# #
while (<STDIN>) {
my $addr;
my $n;
- my $awaiting;
+ my $awaiting = "";
CLASSIFY: {