#!/usr/bin/perl

format STDOUT =
@<<<<@<<<<@<<<<<<<<<<
$a, $b, $c
.

$a = "a";
$b = "b";
$c = "c            ";
write(STDOUT);


##</code><code>##

'a    b    c            '