use strict;
use warnings;
my %groups = (
    'GroupID1' => true,
    'GroupID2' => false
);

##</code><code>##

Bareword "true" not allowed while "strict subs" in use
Bareword "false" not allowed while "strict subs" in use

##</code><code>##

my %groups = (
    'GroupID1' => \1,
    'GroupID2' => \0
);