Select Code to Download

#! /usr/bin/perl -w
use strict;
...

write \*STDOUT;
}

$ ./centre-via-format.pl
  a
...
0000020 d  \n
         0a64
0000022