format is a compile-time global declaration.You can declare formats of different names and use the $~ variable to pick which to write to in each subroutine.

Or, as the Camel suggests, use Filehandle and call the format_name method on the handle as appropriate.