use strict;
use warnings;

my $num1 = 4;
my $str1 = "4";
my $str2 = "     4";
print "number \$num1 is equal to string \$str2!!\n"if $num1 == $str2;
print "number \$num1 is equal to string \$str1!!\n" if $num1 == $str1;
print "string \$num1 is equal to string str2 !!\n" if $num1 eq $str2;
print "string \$num1 is equal to string str1 !!\n" if $num1 eq $str1;



__OUTPUT__
number $num1 is equal to string $str2!!
number $num1 is equal to string $str1!!
string $num1 is equal to string str1 !!