use strict;
use warnings;
chomp(my $x = <DATA>);
chomp(my $y = <DATA>);
#$x += 0;
if($x == $y)    {
    print $x . " and " . $y . " are equal\n";
}
else    {
    print $x . " and " . $y . " aren't equal\n";
}
__DATA__
0010
10

##</code><code>##

0010 and 10 are equal