or download this
Use of uninitialized value in numeric ne (!=) at w.pl line 8.
Argument "Hi" isn't numeric in numeric ne (!=) at w.pl line 8.
...
Use of uninitialized value in numeric ne (!=) at w.pl line 10.
Use of uninitialized value in numeric ne (!=) at w.pl line 11.
$number is defined