# Unpredictable-
my $x = 1 if $y;
# Safe-
my $x;
$x = 1 if $y;