$name = "Wastl";
$~ = NAME;
write;

format NAME =
@<<<<<<<<
$name
.

format NAME_TOP =
Name
.