警告が出そうで出ないコード

このコードで警告が出ないというのを知りませんでした。

use strict;
use warnings;

my $val;
$val++;
print $val, "\n";

use strict;
use warnings;

my $val;
$val += 10;
print $val, "\n";

これは警告が出ます。

use strict;
use warnings;

my $val;
$val = $val + 10;
print $val, "\n";