my $quote    = q{'};
my $question = q{?};
my $star     = q{*};
my $empty    = q{};