[FUGSPBR] [OT] Alguémsabe PERL por aí?

[Alexandre Mioranza]

Aí valeu, agora sim está perfeito.

On Thu, 24 Apr 2003 12:33:21 -0300
"Renato Botelho" <renato em galle.com.br> wrote:

> pra pegar o ultimo item eh soh fazer assim
> 
> $files[$#files]
> 
> ----- Original Message ----- 
> From: "Alexandre Mioranza" <alexandre.mioranza em varig.com>
> To: "Grupo Brasileiro de Usuarios FreeBSD" <fugspbr em fugspbr.org>
> Sent: Thursday, April 24, 2003 9:38 AM
> Subject: Re: [FUGSPBR] [OT] Alguémsabe PERL por aí?
> 
> 
> > Cara veleu mesmo, funcionou perfeito.
> >
> > On Thu, 24 Apr 2003 09:19:03 -0300
> > "Renato Botelho" <renato em galle.com.br> wrote:
> >
> > > Não sei se eu entendi direito, você quer pegar o número que está no nome
> do
> > > arquivo? se for isso voce pode fazer o seguinte
> > >
> > > @files = glob("/tmp/.X[0-9]*-lock");
> > >
> > > $files[1] =~ m/.X([0-9]+)-lock/i;
> > > $displayNumber = $1;
> > > $displayNumber++;
> > >
> > > isso deve funcionar
> > >
> > > []s
> > >
> > > Renato
> > >
> > > ----- Original Message ----- 
> > > From: "Alexandre Mioranza" <alexandre.mioranza em varig.com>
> > > To: <fugspbr em fugspbr.org>
> > > Sent: Thursday, April 24, 2003 8:32 AM
> > > Subject: [FUGSPBR] [OT] Alguémsabe PERL por aí?
> > >
> > >
> > > > Preciso alterar um script em perl e não estou conseguindo, me falta
> > > experiência na linguagem, e preciso disto meio urgente se alguém poder
> me
> > > ajudar com alguma documentação ou me mostar como fazer para alterar o
> > > código. Vou transcrevê-lo abaixo para demonstrar o que preciso fazer:
> > > >
> > > > >>>>>>>>>>> Inicio codigo
> > > >
> > > > $displayNumber = 1;
> > > > $geometry = "800x600";
> > > > $depth = 24;
> > > > $desktopName = "X";
> > > > $vncUserDir = "$ENV{HOME}/.vnc";
> > > > $xauthorityFile = "$ENV{XAUTHORITY}" || "$ENV{HOME}/.Xauthority";
> > > >
> > > > >>>>>>>>>> Fim do código
> > > >
> > > > Enfim o que quero mudar é algo estúpido mas não conheço alinguagem
> para
> > > poder fazê-lo, o que eu preciso é tornar a variável $displyNumber
> dinâmica e
> > > não fixa, ele vai pegar o número do display através do arquivo
> > > .X<num_display>-lock que é um arquivo que está localzado em /tmp
> > > incrementado em + 1.
> > > >
> > > > Se alguém poder me ajudar eu agradeço.
> > > > _______________________________________________________________
> > > > Sair da Lista: http://www2.fugspbr.org/mailman/listinfo/fugspbr
> > > > Historico: http://www4.fugspbr.org/lista/html/FUG-BR/
> > > >
> > >
> > > _______________________________________________________________
> > > Sair da Lista: http://www2.fugspbr.org/mailman/listinfo/fugspbr
> > > Historico: http://www4.fugspbr.org/lista/html/FUG-BR/
> > _______________________________________________________________
> > Sair da Lista: http://www2.fugspbr.org/mailman/listinfo/fugspbr
> > Historico: http://www4.fugspbr.org/lista/html/FUG-BR/
> >
> 
> _______________________________________________________________
> Sair da Lista: http://www2.fugspbr.org/mailman/listinfo/fugspbr
> Historico: http://www4.fugspbr.org/lista/html/FUG-BR/
_______________________________________________________________
Sair da Lista: http://www2.fugspbr.org/mailman/listinfo/fugspbr
Historico: http://www4.fugspbr.org/lista/html/FUG-BR/