Envio de dados para formulário .htm
Rafael Lebrão Martins
rafamv1 em ig.com.br
Domingo Março 18 23:40:39 PDT 2007
Boa tarde pessoal. O código abaixo envia as informações contidas no arquivo
"users" para o browser, no entanto, eu queria que o formato em que essas
informações aparecessem fosse mais amigável. Há como fazê-lo ficar mais
organizado na página?
--------------------------------------------------------------------
#!/usr/bin/perl
use strict;
use warnings;
use CGI qw ( :standard);
my $users = '/home/rafael/users';
open (USERS,$users) or die ("Nao pode abrir o arquivo: $!");
print header(), start_html( "Usuarios e Senhas" );
while(<USERS>) {
if (/(.+?)\s+(.+?)\s+(producao|diretoria)?$/) {
print "Usuario: $1<br> senha: $2 Grupo: ". ($3 eq
"producao"?"producao\n<br>":"diretoria\n<br>");
}
}
close (USERS);
-------------------------------------------------------------------
o resultado é o seguinte:
Usuario: rafael senha: zxc1234, Grupo: producao
Usuario: roberto senha: zxc1234, Grupo: producao
Usuario: marcelo senha: zxc1234, Grupo: diretoria
Usuario: allan senha: zxc1234, Grupo: producao
Usuario: teste senha: sdd123, Grupo: producao
Usuario: squid senha: asd123, Grupo: producao
Usuario: suporte senha: asd123, Grupo: producao
Eu queria que ele fosse assim:
GRUPO DIRETORIA
Usuário Senha
-------- ------
marcelo asd123,
GRUPO PRODUCAO
Usuário Senha
------- ------
rafael asd123,
Rafael Lebrao Martins.
Cursando Ciências Contábeis.
Universidade Estadual Do
Sudoeste Da Bahia.
Microsoft Certified
Professional
70-271:Supporting Users and
Troubleshooting a Microsoft®
Windows® XP Operating System
TEL - (77) 9989-6327
Mais detalhes sobre a lista de discussão Cascavel-pm