Booleans in Perl are not 1s and 0s, they are 0, '0', "", undef as "FALSE", and everything else as "TRUE". So negating "1" (TRUE) gives you "" (FALSE). If you need it to be a number, do something like $false_value += 0 or my $number = $false_value ? 1 : 0