为什么“!!”在Perl中被认为是坏的形式？

我的团队和我一直使用这个运算符多年，没有意识到它被认为是“坏的形式”。

“bang bang”操作符有副作用或其他意外行为吗？为什么，或者可能，被认为是“坏形式”的一些？有没有惯用的替代方法？

下面是几个例子，我会考虑！可接受和/或期望。

>编码练习中的实际代码，这是添加布尔的示例：

while (my $line = <$F>) {
    # snip
    exists $counts{lines} and $counts{lines} += !! chomp $line;
}

>使用布尔值作为哈希键(清楚地简化示例)：

sub foo {
    my ($input) = @_;
    my %responses = ( '' => "False",1 => "True" );
    return $responses{ !! $input };
}

>在按位操作中使用布尔值，或者甚至使用pack()：

sub foo {
    my ( $a,$b,$c ) = @_;
    my $result = !!$a + (!! $b)<<1 + (!! $c)<<2;
    return $result;
}

>你需要做一个类型转换，以供外部库/进程使用，例如数据库，它只认为某些值是真实的：

my $sth = $dbh->prepare("INSERT INTO table (flag,value) VALUES (?,?)")
$sth->execute("i_haz_cheeseburger",!! $cheeseburger_string)