Perl's glob was originally implemented in terms of csh's. From man csh:

If a word contains any of the characters *, ?, [ or { or begins with the character ~ it is a candidate for filename substitution, also known as globbing.

If you use the bsdglob function from File::Glob (which is how glob is implemented nowadays), you can pick behaviour as desired.

Makeshifts last the longest.