my $a = my $b = my $c = "TRUE";
[download]

or perhaps more clearly,

my $a = 
my $b = 
my $c = "TRUE";
[download]

The my operator binds fairly tightly.