$ perl -E 'my $re = qr{([0-6BS])}; say ref($re)'
Regexp