my $oct = 017;
my $dec = "017";
print $oct+0, $/, $dec+0; #plus zero forces it to be numeric