for my $f (@_) { $have{$+}++ if $f =~ /^\??({([^{}]+)}|.)/; }