If statement and integer comparsion
#!C:/Perl/Bin $number = 5; if ($number = 5) { print "\n\n\$number is equal to 5\n\n"; }