Re: Is this code correct

[choroba]

We don't know what the proper value is, you didn't tell us. In your example, the uninitialised variable is $sixth, but you seem to be using it as if it held the proper value.

If your Perl is recent enough (5.10+), you can use

$variable //= $default_value;

which uses the defined-or assignment operator that only assigns the value if the variable doesn't have a defined value.