Re: [Arsperl-users] Parse arx file
Brought to you by:
jeffmurphy
Menu
▾
▴
Re: [Arsperl-users] Parse arx file
|
From: Brad O'H. <br...@uf...> - 2008-01-20 13:08:10
|
Mark,
Thanks for the help. Here is the code I am using that seg faults
when I try it.
#!/usr/bin/perl
use Text::Balanced qw( extract_delimited );
$line = `/usr/bin/tail -1 /home/arsrv/bin/perlmods/help.txt`;
while ( length($line) ) {
if( substr($line,0,1) eq '"' ) {
( $val, $line ) = extract_delimited( $line, '"' );
last if defined($line) && !defined($val);
$val =~ s/^"//;
$val =~ s/"$//;
$val =~ s/\\\\/\\/g;
$val =~ s/\\r//g;
$val =~ s/\\n/\n/g;
$val =~ s/\\"/"/g;
}
else {
$line =~ s/(\S+)//;
$val = $1;
}
push @ret, $val;
$line =~ s/\s*//;
}
print ">$ret[9]<\n";
exit;
I will tried a new export with the same result. I placed a new arx
file at the address I gave you.
It contains the record before the problem record as well as headers.
Thanks again,
Brad
On Jan 20, 2008, at 12:26 AM, Mark Vaughan wrote:
> Brad,
> I took a look at your file.
>
> The first data record reads okay.
>
> The second data record reads okay in that the routine does not die.
> The
> problem is the tenth field (Scheduled Date, ID 536870921, type
> DATE). It is
> a 1,039,967 byte (after translation) character string. It is not a
> date
> field by any means.
>
> You may wish to regenerate your ARX file.
>
> HTH,
> Mark Vaughan
> 303.471.9987 (home)
> 303.601.4434 (mobile)
> -----Original Message-----
> From: ars...@ar...
> [mailto:ars...@ar...] On Behalf Of Brad O'Hara
> Sent: Saturday, January 19, 2008 6:28 PM
> To: ARSperl User Discussion
> Subject: Re: [Arsperl-users] Parse arx file
>
> Mark,
>
> It is a very large record. I placed it at
> http://remedy.cns.ufl.edu/arsperl
> Any help greatly appreciated.
>
> Brad
>
> On Jan 19, 2008, at 12:03 PM, Mark Vaughan wrote:
>
>> What's the record look like?
>> Please send an ARX file with the header, one good record, and the
>> record
>> that does not process.
>>
>> Thanks,
>> Mark Vaughan
>> 303.471.9987 (home)
>> 303.601.4434 (mobile)
>> -----Original Message-----
>> From: ars...@ar...
>> [mailto:ars...@ar...] On Behalf Of Brad O'Hara
>> Sent: Friday, January 18, 2008 8:29 AM
>> To: ARSperl User Discussion
>> Subject: Re: [Arsperl-users] Parse arx file
>>
>> Thilo,
>>
>> I've come upon a record the causes the following code to seg
>> fault. Do
>> you have any interest
>> in taking a look?
>>
>> Thanks,
>> Brad
>>
>> On Tuesday 13 November 2007 4:35 pm, Brad O'Hara wrote:
>>> Thanks! Certainly something I can work with!
>>>
>>> Brad
>>>
>>> On Tuesday 13 November 2007 3:01 pm, Thilo Stapff wrote:
>>>> Here's a subroutine that splits a line in ARX format to an array of
>>>> values. It works for the basic data types such as character,
>>>> integer
>> etc.
>>>> More complicated data like attachments, diary and currency would of
>>>> course need some further processing.
>>>>
>>>>
>>>> use Text::Balanced qw( extract_delimited );
>>>>
>>>>
>>>> sub splitArxLine {
>>>> my( $line ) = @_;
>>>> my @ret;
>>>> my $val;
>>>>
>>>> print "--------------------\n";
>>>> while( length($line) ){
>>>> if( substr($line,0,1) eq '"' ){
>>>> ( $val, $line ) = extract_delimited( $line, '"' );
>>>> last if defined($line) && !defined($val);
>>>> $val =~ s/^"//;
>>>> $val =~ s/"$//;
>>>>
>>>> $val =~ s/\\\\/\\/g;
>>>> $val =~ s/\\r//g;
>>>> $val =~ s/\\n/\n/g;
>>>> $val =~ s/\\"/"/g;
>>>>
>>>> print "<$val>\n";
>>>>
>>>> }else{
>>>> $line =~ s/(\S+)//;
>>>> $val = $1;
>>>> }
>>>> push @ret, $val;
>>>> $line =~ s/\s*//;
>>>> }
>>>>
>>>> return @ret;
>>>> }
>>>>
>>>>
>>>>
>>>> Regards,
>>>> Thilo
>>>>
>>>>
>>>>
>>>> Brad O'Hara wrote:
>>>>> Hi all,
>>>>>
>>>>> Anyone written a routine to parse a .arx file?
>>>>>
>>>>> Thanks,
>>>>> Brad
>>>>
>>>>
>>>>
>> -------------------------------------------------------------------------
>>>> This SF.net email is sponsored by: Splunk Inc.
>>>> Still grepping through log files to find problems? Stop.
>>>> Now Search log events and configuration files using AJAX and a
>>>> browser.
>>>> Download your FREE copy of Splunk now >> http://get.splunk.com/
>>>> _______________________________________________
>>>> Arsperl-users mailing list
>>>> Ars...@ar...
>>>> https://lists.sourceforge.net/lists/listinfo/arsperl-users
>>>>
>>>>
>>>
>>
>> --
>> Brad O'Hara E-mail: br...@uf...
>> IT Expert Voice: (352)392-2061
>> Computing and Networking Services Suncom: 622-2061
>> University of Florida Fax: (352)392-9440
>>
>> -------------------------------------------------------------------------
>> This SF.net email is sponsored by: Microsoft
>> Defy all challenges. Microsoft(R) Visual Studio 2008.
>> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
>> _______________________________________________
>> Arsperl-users mailing list
>> Ars...@ar...
>> https://lists.sourceforge.net/lists/listinfo/arsperl-users
>>
>>
>> -------------------------------------------------------------------------
>> This SF.net email is sponsored by: Microsoft
>> Defy all challenges. Microsoft(R) Visual Studio 2008.
>> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
>> _______________________________________________
>> Arsperl-users mailing list
>> Ars...@ar...
>> https://lists.sourceforge.net/lists/listinfo/arsperl-users
>>
>
>
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft
> Defy all challenges. Microsoft(R) Visual Studio 2008.
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> Arsperl-users mailing list
> Ars...@ar...
> https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
>
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft
> Defy all challenges. Microsoft(R) Visual Studio 2008.
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> Arsperl-users mailing list
> Ars...@ar...
> https://lists.sourceforge.net/lists/listinfo/arsperl-users
>
|
