Select Code to Download

my $x = expresssion if condition

for (1..3) {
    my $x = "foo\n" if $_  > 9999;
    print $x;
    $x = "bar\n";
}

Use of uninitialized value in print at /tmp/p line 5.
bar
bar