Thanks to Elie, Jay and Shawn, all work fine, but I used the Jay solution. What
I was using is:
#!/usr/bin/perl
use strict;
use warnings;
$/ = "";
my $file = "111505_SystemOut_1.log";
open ( FILE, "<$file" ) || die "El nombre de archivo es incorrecto o no
existe\n$!\n";
wh
On 11/16/05, Rafael Morales <[EMAIL PROTECTED]> wrote:
> Hi list !!!
>
> This is my trouble, I have a file with this output:
>
> [11/14/05 22:52:10:130 GMT] 686b4b72 SystemOut O POST:
> https://198.104.159.77/ssldocs/ws/xt_vm_transkods.alia?brand=KO-BR&person_id=14560115&password=teatro&trans_
Elie De Brauwer wrote:
You could for example do that by buffering them. Following example reads
from standard input. No that you should replace the regexp by something
with more meaning in your context. This application also assumes that
there will be at least three lines of input.
my $a=;
ch
Rafael Morales wrote:
Hi list !!!
This is my trouble, I have a file with this output:
[11/14/05 22:52:10:130 GMT] 686b4b72 SystemOut O POST:
https://198.104.159.77/ssldocs/ws/xt_vm_transkods.alia?brand=KO-BR&person_id=14560115&password=teatro&trans_id=2&amount=10&trans_date=2005-11-14
20:
