Here's another variation on a theme:

map{ $_ = 'TRUE' }
    my( $a, $b, $c );
[download]

Not sure if that's taking us farther down an obfuscated road, but it does wield map in void context for the fun of it. ;)