_  _   ,_
  /^\/^\-/ @D
~(________/   PERL.LT
   |L  |L
   L   L

• oct EXPR
• oct

  Interpretuoja EXPR kaip aštuntainę eilutę ir gražina atitinkamą reikšmę. (Jei EXPR prasideda 0x , jį laiko šešioliktaine eilute. Jei EXPR prasideda 0b, tai laikoma dvejetaine eilute. Priekyje einantys tarpai ignoruojami visais atvejais.) Pavyzdžiai tvarkysis su dešimtainiais, dvejetainiais, aštuntainiais ir šešioliktainiais standartiniame Perl'e arba C užrašyme:

      $val = oct($val) if $val =~ /^0/;

  Jei EXPR praleistas, naudoja $_ . Eiti kitu keliu (numerį atvaizduoti aštuntainį), naudokite sprintf() arba printf():

      $perms = (stat("filename"))[2] & 07777;
      $oct_perms = sprintf "%lo", $perms;

  oct() funkcija paprastai naudojama, kai eilute, kaip kad 644 turi būti paversta į failo režimą, pvz. (NOrs perlas automatiškai pavers eilutes į skiačius, kaip ir reikalaujama, šis automatinis konvertavimas turi pagrindą 10.)