#!./perl -wd
use strict; use warnings;
BEGIN {
	push @DB::typeahead, 'b 8', 'L b', 'c', 'q';
	$DB::single = 0;
}

print "Hello\n";