My Perl Quiz

The ultimate place to learn Perl!

Question #24: What gets printed?

my $a = 123;
my $b = 0123;

if ($a == $b) {
    print "same";
} else {
    print "different";
}