ok $lines[0], MESSAGE1;
ok $lines[-1], qr/bob:\s+\d+% \#+/, 'Count 1-10 (6)';
ok $lines[-1], qr/^bob:\s+100%/, 'Count 1-10 (7)';
ok $lines[0], MESSAGE1;
ok $lines[-1], qr/bob:\s+\d+% \#+/, 'Count 1-10 (6)';
ok $lines[-1], qr/^bob:\s+100%/, 'Count 1-10 (7)';