programming-examples/perl/Datatype/Octal numerals starting with 0x.pl

#!/usr/bin/perl -w  

print "0x30\n";
print "030\n";