You are viewing the version of this documentation from Perl blead. This is the main development branch of Perl. (git commit 505e049e46a4f820493a559fcd488c8ec766b9d2)
format

Declare a picture format for use by the write function. For example:

format Something =
    Test: @<<<<<<<< @||||| @>>>>>
          $str,     $%,    '$' . int($num)
.

$str = "widget";
$num = $cost/$quantity;
$~ = 'Something';
write;

See perlform for many details and examples.