my $regexp = qr/ (?: ( int | char | bool | long ) ) /x;
[download]

There's still the grouping parentheses. It should be like this in order to follow lima1's update:

my $regexp = qr/ (?: int | char | bool | long ) /x;
[download]