1:53 >perl -wE "say oct('022');"
18

 2:08 >