Help on -w

[LRMK]

#!/usr/bin/perl -w


my $a;

if ($a eq 'fff'){



}
above  line gives the error Use of uninitialized value in string eq at t.pl line 6.

but when -w not used in top line it works perfect
what the -w really does