Use Perl para criar relatórios simples . Inclua um cabeçalho com um título , número de página e outras informações importantes. Perl rastreia quantas linhas estão no relatório e faz uma nova página quando necessário. Estes relatórios são úteis para relatar grandes quantidades de dados com uma pequena saída de texto . Crie os relatórios usando um relatório de forma livre ou definir um formato fixo . Instruções 
 1 
 Abra seu arquivo FORMAT.DAT aplicação Perl 
 2 
 Digite aberto " (FILE , " @ linhas =; . Próximo (FILE) ; . " Isso define o formato do relatório para que cada entrada é a sua própria linha. 
 3 
 Criar o corpo do Perl informar dando direção Perl sobre o que relatar . Usando uma lista de supermercado como um exemplo , digite " para cada ( @ linhas ) { costeleta ; ($ $ Isle, ponto , preço $ ) = (split (//) !) ; print (" Ilha ilha = $ item = $ item de preço = $ preço \\ n " . . );} " 
 4 
 Utilize este formato se os itens do banco de dados estão todos completos Se há itens em falta , o formato não será responsável por itens perdidos Veja o exemplo : Ilha = 5 Item = Preço = Ilha = 2 Item = Laranjas Preço = 0.32Isle = 7 Item = batata Chips Preço = 2.95Isle = 9 Item = Lâmpadas Preço = 2.50 
 5 
 Escreva a lista de outra forma , se você quiser . um formato de largura fixa Use o código " para cada ( @ linhas) { 
 
 costeleta ; 
 
 ( $ ilha, $ item $ preço ) = ( ! split ( //) ) ; 
 
 $ ilha = "" se definido ( $ ilha ); ! Estas linhas atribuir nulo 
 
 $ ponto = "" se definido ( $ item) ; ! cadeias se nenhuma informação é < br > 
 $ preço = "" se definido ( $ preço ); ! . presente no registro 
 
 print (" Ilha ilha = $ item = $ item de preço = $ preço \\ n"); < br > 
 } " 
 6 Saída 
 o Perl criado relata semelhante ao exemplo a seguir : Ilha = 5 item = Preço = Ilha = 2 Item = Laranjas Preço = 0.32Isle = 7 artigo = batata Chips Preço = 2.95Isle = 9 Item = Lâmpadas Preço = 2.50